VB中DataGrid1中数据选择
为什么下面的程序,在点击DataGrid1表格中数据时,只能点击第一页的数据,当点击第三页中的数据时还会自动跳到第一页的数据上面PrivateSubDataGrid1_R...
为什么下面的程序,在点击DataGrid1表格中数据时,只能点击第一页的数据,当点击第三页中的数据时还会自动跳到第一页的数据上面
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
On Error Resume Next
Dim H As Integer
H = DataGrid1.Row
rs.AbsolutePosition = H + 1
If Trim(rs.Fields("采购")) <> "" Then
Command4.Caption = "已处理"
Else
Command4.Caption = "未处理"
End If
End Sub 展开
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
On Error Resume Next
Dim H As Integer
H = DataGrid1.Row
rs.AbsolutePosition = H + 1
If Trim(rs.Fields("采购")) <> "" Then
Command4.Caption = "已处理"
Else
Command4.Caption = "未处理"
End If
End Sub 展开
1个回答
展开全部
rs的页面没有定位，翻页时，rs.absolutepage要对应着加或减
追问
有没有具体的源码,
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
七鑫易维信息技术
2024-09-02 广告
Play Video 七鑫易维是致力于机器视觉和人工智能领域的高新科技企业，迄今已专注眼球追踪技术的研发、创新与应用超过14年，拥有完全自主知识产权，全球专利总量655余项。 作为眼球追踪技术领域的全球知名品牌，七鑫易维的产品体系覆盖眼动分...
点击进入详情页
本回答由七鑫易维信息技术提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
