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需要在你的查询变化的时候重置一下,比如赋�
相关问答：
我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
vb中 现在我要把数据库里存储的一个附件的内容替换了，怎么做，只是替换我指定的位置，不是全部替换
请将问题说明白，存储字段格式，如果是Binary格式的比较麻烦，如果是字串，直接替换。最好不要进行指定位置替换� ......
问题：
现在Access数据库中有两张表TableA和TableB
TableA中有记录如下:
字段1(Name) 字段2(Num)
A 3
A 4
B 6
... ......
form1中有text1-8， 和command1
text8中为程序代码（生成窗体为form2（已做好））
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题
......
各位高手，小弟最近碰到一个问题：原先写的程序大概的思路是：首先webbrowser打开网址，网址显示后，点击网址上的某一个连接，当webbrowser检测到网址已经连接到想要的地址时候就开始下载文件，当用IE6的时候下� ......
