织梦CMS - 轻松建站从此开始!

VBA教程、excel VBA编程、VBA视频、VBA控件,VBA应用教程,vba技巧

当前位置: vba技术联盟>VBA教程>

HeadClick事件应用实例

时间:2009-12-17 17:25来源:未知 作者:vba技术联盟 点击:
本例基于被单击的列对 Data 控件的记录源进行排序。 Private Sub DataGrid1_ HeadClick ( ColIndex As Integer ) Data1.RecordSource = Select * From Publishers Order By _ DataGrid1.Columns(ColIndex).DataField Data1.Refresh End Sub

本例基于被单击的列对 Data 控件的记录源进行排序。

Private Sub DataGrid1_HeadClick (ColIndex As Integer)
   Data1.RecordSource = "Select * From Publishers Order By " & _
    DataGrid1.Columns(ColIndex).DataField
   Data1.Refresh
End Sub



 

(责任编辑:vba技术联盟)
顶一下
(0)
0%
踩一下
(0)
0%
------分隔线----------------------------
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价:
验证码: 点击我更换图片
栏目列表
推荐内容