ListView排序问题？？ （不好意思，只有这么点分了）

[lion_qi0212]

ListView排序是按字符排，就会出现
1
11
12
2
5
6
这怎么解决呢？

[zhangyuqin]

把这些东西放到一个整型的数组里排序后在加到ListView里就行了

[vansoft]

用API，可以让Listview按数字、金额、日期、IP地址来排序。

我已经封装好DLL。

[terrywolf]

http://community.csdn.net/Expert/topic/4649/4649809.xml?temp=.2336389

http://community.csdn.net/Expert/topic/4679/4679268.xml?temp=.9135095

在坛子里输入"ListView 排序"，你一定会找到答案的！！！
祝你成功！

[lion_qi0212]

能不能说详细点，如何用API

[Snoworld]

可以自己寫個DLL,
來引用它來進行排序.

[WM_JAWIN]

DLL在那里？ 还没编译。
代码呢？用DLL就行了。
DLL那里.....(死循至死）

[lion_qi0212]

抱歉，我没说完全，我的这一列不是首列，是第五列

[l7456]

Private Sub lvUserList_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
Dim i As Integer
lvUserList.SortKey = ColumnHeader.Index - 1

For i = 1 To lvUserList.ListItems.Count
lvUserList.ListItems(i).TEXT = Format(lvUserList.ListItems(i).TEXT, "000000000000")
Next
If lvUserList.SortOrder = lvwDescending Then
lvUserList.SortOrder = lvwAscending
Else
lvUserList.SortOrder = lvwDescending
End If
lvUserList.Sorted = True
For i = 1 To lvUserList.ListItems.Count
lvUserList.ListItems(i).TEXT = Val(lvUserList.ListItems(i).TEXT)
Next
End Sub

[gjianpro]

使sorted为true,然后设置排序的字段sortkey,再设置sortorder为升序或者降序就好了