DATAGRID控件有关问题。
【求助】DATAGRID控件问题。。
本人用DataGrid控件显示了一个数据表,想试用点击“下一页”来控制表中左边的光标随之向下移动。部分代码如下。
with rs
.MoveNext
If .EOF Then
MsgBox "记录已到尾!", , "提示"
.MoveLast
End If
If DataGrid1.Row = rs.RecordCount - 1 Then
DataGrid1.Row = rs.AbsolutePosition
End If
If DataGrid1.Row < rs.RecordCount - 1 Then
DataGrid1.Row = DataGrid1.Row + 1
End If
显示的记录会通过MOVENEXT移动到下一条,但是左边的光标不会移动,要使用
DataGrid1.row = DataGrid1.row + 1 才能使左边的光标移动。但是有一个分界条件我找不到。
运行了以后可以实现这个功能,但是当到达最后一个的时候就会出错,显示“行号无效”。而且我这个条件的分点也有问题。
请高人帮小弟指点一下。。谢谢。!
------解决方案--------------------
当前行+1
------解决方案--------------------
请问如何在 vs2010 里面添加 MSHFlexgrid 控件呢
------解决方案--------------------
当前行+1是可以让光标移动,但是到最后一行就会出现“行号无效”的错误,是不是有什么判定条件呢 ?
本人用DataGrid控件显示了一个数据表,想试用点击“下一页”来控制表中左边的光标随之向下移动。部分代码如下。
with rs
.MoveNext
If .EOF Then
MsgBox "记录已到尾!", , "提示"
.MoveLast
End If
If DataGrid1.Row = rs.RecordCount - 1 Then
DataGrid1.Row = rs.AbsolutePosition
End If
If DataGrid1.Row < rs.RecordCount - 1 Then
DataGrid1.Row = DataGrid1.Row + 1
End If
显示的记录会通过MOVENEXT移动到下一条,但是左边的光标不会移动,要使用
DataGrid1.row = DataGrid1.row + 1 才能使左边的光标移动。但是有一个分界条件我找不到。
运行了以后可以实现这个功能,但是当到达最后一个的时候就会出错,显示“行号无效”。而且我这个条件的分点也有问题。
请高人帮小弟指点一下。。谢谢。!
------解决方案--------------------
当前行+1
------解决方案--------------------
请问如何在 vs2010 里面添加 MSHFlexgrid 控件呢
------解决方案--------------------
当前行+1是可以让光标移动,但是到最后一行就会出现“行号无效”的错误,是不是有什么判定条件呢 ?