Question

新手问vb里 Data数据库小问题

最底下data控件是正常的，可以切换数据。但点上面的command1控件就出问题如上图所示。





Answer 1

你说使用下面的按钮有错误提示，我的理解不是所有时候都出错误的！
比如：
你单击上面一排的第2个按钮，就是前移一条记录，第1次不出错，但是第2次就出错了。
等等。
为什么呢？
你应该使用Data1.Recordset.Eof属性和Data1.Recordset.Bof属性，这样就不会出这种错误。
移动数据记录的
Data1.Recordset.MoveNext
Data1.Recordset.MovePrevious
2个语句要看记录指针是否已经移动到数据表外，不能任意的执行这2句语句的．
当记录指针指向任意具体存在的记录时，
Data1.Recordset.Eof和Data1.Recordset.Bof都为False

当记录指针指向最后1条记录时，执行
Data1.Recordset.Movenext
后，记录指针从表内下端移出表外，（注意：很拗口？）指针指向最后1条记录的“下面”空处
Data1.Recordset.Eof 为True　 ----指针发生“由表的下端移出到表外”
Data1.Recordset.Bof 为False 　----指针没有发生“由表的上端移出表外”

当记录指针指向第1条记录时，执行
Data1.Recordset.MovePrevious
后，记录指针从表内上端移出表外，（注意：很拗口？）指针指向第1条记录的“上面”空处
Data1.Recordset.Eof 为False ----指针没有发生“由表的下端移出到表外”
Data1.Recordset.Bof 为True　　----指针发生“由表的上端移出表外”

而特别的情况，当返回的记录集合（数据表）里，没有任何记录的时候（空）
Data1.Recordset.Eof　为True
Data1.Recordset.Bof 为True

所以，执行Data1.Recordset.Movenext，需要判断
If Not Data1.Recordset.Eof Then
Data1.Recordset.Movenext
end if
同样的，
所以，执行Data1.Recordset.MovePrevious，需要判断
If Not Data1.Recordset.Bof Then
Data1.Recordset.MovePrevious
end if

当然，上面朋友提出的空格问题，也要注意！

Answer 2

你的代码不对,
应该是 with data1.recordset
就可以了.
Sorry,没有看请图片,
你在下面使用了.Recordset但是后面不能有空格,去掉Recordset后面的空格就可以了.

Answer 3

注意点号
看样子这个点号有问题。方法或数据成员没有找到