如何给datagrid的被选中列反向排序?

Question

谁会做datagrid控件中，一点击一列的上方，就按升序或者降序排列！谢谢了
http://www.csdn.net/expert/topic/325/325087.shtm

Answer 1

Private Sub DBGrid1_HeadClick(ByVal ColIndex As Integer)
   Data1.Recordset.Sort = "排序字段"
   Set Data1.Recordset = Data1.Recordset.OpenRecordset
End Sub

Answer 2

另外一种是：
SQLstring="Select * ....."
data1.recordsource=SQLstring & OrderStringOrderString为根据datagrid的被选中列进行的排序设置串，如：
OrderString=" Order by 字段1 ASC/DESC "
不晓得对你有没有帮助？！