vb msflexgrid

来源:百度知道 编辑:UC知道 时间:2024/09/21 01:50:57
怎么移动记录到下一个啊?我里面有多行的记录。怎么编写代码 一行一行的自动往下移动??

datagrid有 movenext 这个控件有吗

楼主指的是怎么样移动记录?是显示的时候能显示多行记录还是怎么的?请说的明白点。
如果你指的是用MSHFlexGrid显示多行数据的话,用循环的方法就可以了。
Do While Not rs.EOF
'do……loop循环用以输入所有表内的数据,表内无数据时结束循环
With MSHFlexGrid1
.Rows = .Rows + 1 '逐次递增行数
.CellAlignment = 4 '定义单元格的内容居中、居中对齐
.TextMatrix(.Rows - 1, 0) = rs.Fields(0)
'Rows=3+1-1=3,从第三行起输入数据
.TextMatrix(.Rows - 1, 1) = rs.Fields(1)
.TextMatrix(.Rows - 1, 2) = rs.Fields(2)
.TextMatrix(.Rows - 1, 3) = rs.Fields(3)
.TextMatrix(.Rows - 1, 4) = rs.Fields(4)
rs.MoveNext '移动至数据表的下一行
End With
Loop
以上代码仅作参考,是假设为有4列数据录入的情况。
希望能对楼主有所帮助。如果是我理解发生问题希望能完善一下问题我好继续回答。

datagrid.row=datagrid.row+1

不清楚你说的什么意思
但datagrid本就可以移动其中的记录
msflexgrid的话用键盘触发事件试试(keydown),当按下"↓",行数加1