VB中datagrid排序问题

来源：百度知道 编辑：UC知道 时间：2024/05/17 23:12:40
如何点击表头实现数据的排序

使用adodc连接sqlserver

感谢
VB 不是ASP.NET
随便搜索一下就发答案 你也好意思啊

Private Sub DataGrid_View_HeadClick(ByVal ColIndex As Integer)
Dim SqlStr As String
Dim SqlDB As String
Dim i As Integer
SqlDB = DB_Source'表名称
OderColumns = ColIndex
SqlStr = SqlDB & " Order By " & DataGrid_View.Columns(OderColumns).DataField

Adodc_Data.RecordSource = SqlStr
Adodc_Data.Refresh
End Sub

在要排序的列加上SortExpression=" 你的DateField名字 DESC/ASC"即可；
例子如下：
在每一列声明上如下：
<asp:BoundColumn HeaderText="Title" DateField="title" SortExpression="title ASC"/>
<asp:BoundColumn HeaderText="Price" DateField="price" DateFormatString="{0:c}"
HeaderStyle-HorizontalAlign="center" ItemStyle-HorizontalAlign="right"
SortExpression="price DESC"/>
这就可以实现Title的升序和Price的降序排列；