Visual Basic中Data控件的主要事件

　Visual Basic 的Data控件除了具有其他控件都有的事件外(如MouseMove，MouseDown等)，还具有一些与数据库访问有关的特有事件：Error事件、Reposition事件和Validate事件。这些是经常要用到的事件，下面将逐一介绍。

　　1.Error事件

　　一般地，在开发应用程序时通常要在代码中为代码运行错误时提供错误处理的功能，但有时在没有代码运行时也会发生数据存取的错误。例如当用户单击Data控件按钮时，如果发生运行错误，就会产生Error事件。可以在编写Error事件的事件过程中处理这一类错误。Error事件的语法为：

以下是引用片段： 　　private sub object_error([index AS integer,} dataerr As Integer，response AS Integer)

　　其中object为data控件对象名;index为可选参数，当data控件是一个控件数组的成员时，index是用于标识该控件的索引号;dataerr是一个错误号;response为0时，表示继续，缺省值为1，表示显示错误信息。

　　2.Repositon事件

　　无论何时只要用户单击Data控件上某个箭头按钮，进行记录间的移动，或者在代码中使用某个Move方法(如MoveNext)或Find方法(如FindFirst)，或任何其他改变当前记录的属性或方法，在每条记录成为当前记录以后，都会发生Reposition事件。使用这种事件可以进行基于当前记录中数据的计算，或者改变窗体来响应当前记录中的数据。

　　Repositon事件的语法如下：

以下是引用片段： 　　Private sub object_reposition ([index As integer])

 　　其中只有一个可选参数，当data控件是一个控件数组的成员时，index是用于标识该控件的索引号。

　　3.Validate事件

　　Validate事件在一条新的记录成为当前记录之前，并且在Update方法之前(用UpdateRecord方法保存数据时除外)发生;或者在Delete、Unload或Close操作之前发生。使用Validate事件和DataChanged属性对写入数据库的记录执行合法性检查。

　　Validate事件过程的语法为：

以下是引用片段： 　　private sub object_validate([index as integer,] action as integer save as integer

　　其中index为可选参数，为控件在控件数组中的索引号。

　　Action参数由系统传递给该事件过程，是一个整数，用来指明引发该事件的操作，也可以设置action参数的值，把一个操作转换为另一个操作。

　　save参数初始时指出被连接的数据是否已经改变。当被绑定的数据感知控件中的数据被修改后，其值为True，否则为False。

　　即使被绑定的控件中的数据未改变或者不存在被绑定的控件时，Validate事件也会发生。用这一事件可以改变值和更新数据，也可以选择保存数据或停止任何引起事件发生的操作并代之以一种不同的操作。

查看本文来源