VB中移动当前记录的方法

在Visual Basic中可以使用Move的四种方法来移动记录：MoveFirst，MoveLast，MoveNext和MovePrevious方法。

(1)如果想让记录集中的第一条记录成为当前记录，可以使用MoveFirst方法。例如：

以下是引用片段：
Data1.Recordset.MoveFirst

(2)如果想让记录集中的最后一条记录成为当前记录，可以使用MoveLast方法。例如：

以下是引用片段：
Data1.recordset.MoveLast

(3)如果想让记录集中的下一条记录成为当前记录，可以使用MoveNext方法。MoveNext方法常用来逐个浏览数据库中的数据。例如：

以下是引用片段：
Data1.Recordset.MoveNext

使用MoveNext方法时要注意，当Data控件位于记录集的最后一条记录上时，如果再向后移动记录，就会使得记录集的EOF属性变为True。如果我们将Data控件的EOFAction属性置为1，那么这时当前记录不再有效，并且清除被绑定的数据感知控件上的数据。这时不能再继续执行MoveNext方法，否则会产生一个可以捕获的错误。所以在使用MoveNext之前，最好先判断记录集对象的EOF值，防止出错，可以使用如下代码：

以下是引用片段：
If Data1.Recordset.EOF=False Then 
Data1.Recordset.MoveNext 
End If

(4)如果想让记录集的上一条记录成为当前记录，可以使用MovePrevious方法。例如：

以下是引用片段：
Data1.Recordset.MovePrevious

和MoveNext方法类似，使用MovePrevious方法时要注意，如果已经把BOFAciton属性设为1，当Recordset的BOF属性为True时，不能再继续执行MovePrevious方法，所以在使用MovePrevious方法前，最好先判断记录集对象的BOF值，可以使用如下代码：

以下是引用片段：
If Data1.Recordset.BOF=False Then 
Data1.Recordset.MovePrevious 
End if

【相关文章】

• 用VB.NET 2005编写定时关机程序

• VB.NET实现窗体图标最小化到状态栏

• 如何建立一个VB.NET日期/时间值