vb MSFlexGrid1.Row 实时错误'30009'Row数值无效
代码如下：
Private Sub MSFlexGrid1_SelChange()
If MSFlexGrid1.Rows = 1 Then Exit Sub
If MSFlexGrid1.Row = 0 Then Exit Sub
grid_row = MSFlexGrid1.Row
grid_col = MSFlexGrid1.Col
MSFlexGrid1.Row = grid_row_old
MSFlexGrid1.Col = 0
Set MSFlexGrid1.CellPicture = LoadPicture()
MSFlexGrid1.Row = grid_row
MSFlexGrid1.Col = 0
Set MSFlexGrid1.CellPicture = LoadPicture("c:\gddmt\p0.bmp") 'ICO")
MSFlexGrid1.Col = grid_col
grid_row_old = MSFlexGrid1.Row
End Sub
红色的为报错的 程序要实现的是查询后显示在MSFlexGrid1 当没有条件查询后显示在MSFlexGrid1
然后再有条件查询显示 显示后点击MSFlexGrid1里面的值就会报 “实时错误'30009'Row数值无效”
求各位帮个忙
看一下报警时grid_row_old的值，鼠标指在其上就可以看到
grid_row_old的值是第一次无条件查询时的row值
实际看，你的代码如果有问题，这个值可能可你想的不一样，看是否非法，或大于总行数
设计错误。
重新查询后行数变化，就不能使用旧的行号。
两次查询的结果不一样，记录条数也不一样。
LZ的代码只能针对同一次查询的。
VB code:
'注意,grid_row_old需要在你的查询变化的时候重置一下,比如赋�
相关问答：
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
vb中 现在我要把数据库里存储的一个附件的内容替换了，怎么做，只是替换我指定的位置，不是全部替换
请将问题说明白，存储字段格式，如果是Binary格式的比较麻烦，如果是字串，直接替换。最好不要进行指定位置替换� ......
xmlDoc1.loadXML(h)总是返回false，为什么？谢谢帮忙回答一下
h是什么呢。。。。。。。。。
h是xml格式的字符串
你是想打开。XML格式的文件吧？
我是把h放在xmlDoc1里，用xmlDoc1.loadXML(h)，然后取xmlDo ......
我的要求是：通过抓取别的程序上的表格的句柄，然后读取这个表格的内容。
表格句柄（类名：MSFlexGridWndClass）我已抓到，接下来如何读取表格的内容就不会了？求助。
能把代码发来学习下不？
244326867@qq.com ......
