如何对多个字符串数据排序？谢

Question

我有多个字符串(个数不定)
"asfds"
"sfsdf"
"ctewt"
......
如何把他们排好序(由小到大)后放到一个名为ArrayName()
的数组中我想用冒泡排序法
但用不好。谢谢大家帮忙了

Answer 1

利用list控件的sorted属性
将list的sorted属性设为True.
Private Sub Form_Load()
List1.Visible = False
List1.AddItem "asfds"
List1.AddItem "sfsdf"
List1.AddItem "ctewt"
Dim ArrayName(3) As String
For i = 0 To 2
 ArrayName(i) = List1.List(i)
 Debug.Print ArrayName(i)
Next
End Sub
你也可以用动态数组。