首页 | IT新闻 | 硬件 | 操作系统 | 开发 | 网络编程 | 数据库 | 热门框架 | 网络安全 | 组网 | 建站指南 | 网页制作 | 特效 | 实用技巧 | 服务器 | 办公 | QQ | 探索 | 社区

  • 技术部落
  • 部落首页 > 程序开发 > VB > 正文
  • 在Visual Basic中移动当前记录的方法
      2008-3-8  来源:中国自学编程网  编辑:Jsbulo  热度:

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

      ①如果想让记录集中的第一条记录成为当前记录,可以使用MoveFirst方法。例如:

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

      ②如果想让记录集中的最后一条记录成为当前记录,可以使用MoveLast方法。例如:

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

      ③如果想让记录集中的下一条记录成为当前记录,可以使用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

      ④如果想让记录集的上一条记录成为当前记录,可以使用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