عجیبه! مطمئنی که نداره؟ VB6 هم حتی این مورد رو داره!
DropDownList به همون ترتیبی که اطلاعات بهش Add میشن ذخیره میکنه، پس یه راه اینه که در Query که ایجاد میکنی داده ها رو مرتب شده بهش تحویل بدی:
1 SelectCommand="SELECT * FROM tablename ORDER BY name">
ولی اگه بخوای بدون ارسال Query این کار رو انجام بدی:
1 Private Sub SortDropDown(ByVal dd As DropDownList)
2 Dim ar As ListItem()
3 Dim i As Long = 0
4 For Each li As ListItem In dd.Items
5 ReDim Preserve ar(i)
6 ar(i) = li
7 i += 1
8 Next
9 Dim ar1 As Array = ar
10
11 ar1.Sort(ar1, New ListItemComparer)
12 dd.Items.Clear()
13 dd.Items.AddRange(ar1)
14 End Sub
15 Private Class ListItemComparer _
16 Implements IComparer
17
18 Public Function Compare(ByVal x As Object, _
19 ByVal y As Object) As Integer _
20 Implements System.Collections.IComparer.Compare
21 Dim a As ListItem = x
22 Dim b As ListItem = y
23 Dim c As New CaseInsensitiveComparer
24 Return c.Compare(a.Text, b.Text)
25 End Function
26 End Class
27
کد بالا یک DropDownl list رو میگیره و مرتب میکنه. در حال حاضر دات نت در دسترسم نیست ولی بازم میگردم شاید به جواب بهتری رسیدم...
