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需要在你的查询变化的时候重置一下,比如赋�
相关问答：
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' 读入所有字符到变量中 ......
xmlDoc1.loadXML(h)总是返回false，为什么？谢谢帮忙回答一下
h是什么呢。。。。。。。。。
h是xml格式的字符串
你是想打开。XML格式的文件吧？
我是把h放在xmlDoc1里，用xmlDoc1.loadXML(h)，然后取xmlDo ......
我的要求是：通过抓取别的程序上的表格的句柄，然后读取这个表格的内容。
表格句柄（类名：MSFlexGridWndClass）我已抓到，接下来如何读取表格的内容就不会了？求助。
能把代码发来学习下不？
244326867@qq.com ......
小弟用VB调EXCEL作图
objExlApp.Workbooks.Add
objExlApp.Charts.Add
objExlApp.ActiveChart.ChartType = xlLine
objExlApp.ActiveChart.HasLegend = True
objExlApp. ......
系统在多台电脑上运行，就在其中一台电脑上产生”内存溢出“。
每台电脑操作系统 配置都一样的。。请问是什么原因？
(1)用了设计不完善的控件，控件本身有问题，或者不恰当地使用了api函数。
(2)无限的 ......
