Private Sub lvwDB_ColumnClick(ByVal ColumnHeader As ColumnHeader)
lvwDB.SortKey = ColumnHeader.Index - 1
' 设置 Sorted 为真对列表进行排序。
lvwDB.Sorted = True
End Sub
lvwDB.SortKey = ColumnHeader.Index - 1
' 设置 Sorted 为真对列表进行排序。
lvwDB.Sorted = True
End Sub
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货