vb datagrid控件 我要用按钮实现单击 DataGrid 左边的三角 往下移动一条 单击另一个按钮往上移动 怎么实现
展开全部
Private Sub Command1_Click()
Dim ds As Object
Set ds = Me.DataGrid1.DataSource
Dim rs As Recordset
Set rs = ds.Recordset
If Not rs.EOF Then rs.MoveNext '//往下移动一条
End Sub
Private Sub Command2_Click()
Dim ds As Object
Set ds = Me.DataGrid1.DataSource
Dim rs As Recordset
Set rs = ds.Recordset
If Not rs.BOF Then rs.MovePrevious '//往上移动一条
End Sub
Dim ds As Object
Set ds = Me.DataGrid1.DataSource
Dim rs As Recordset
Set rs = ds.Recordset
If Not rs.EOF Then rs.MoveNext '//往下移动一条
End Sub
Private Sub Command2_Click()
Dim ds As Object
Set ds = Me.DataGrid1.DataSource
Dim rs As Recordset
Set rs = ds.Recordset
If Not rs.BOF Then rs.MovePrevious '//往上移动一条
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
datagrid控件的数据是不是记录集recordset?
要是的话,可以用rs.movenext 和rs.MovePrevious
要是的话,可以用rs.movenext 和rs.MovePrevious
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
DataGrid 左边的三角 是什么东西
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询