关于DataGrid和RecordSet绑定的问题

Question

请套用以下语句
datagrid_error
if dataerror=错误代码 then
msgbox"提示信息"
end if
end sub

Answer 1

原来如此
Error 事件（DataGrid 控件）
      该事件由于数据访问错误而出现，而在没有执行 Visual Basic 代码时就会产生这个错误。语法Private Sub object_Error([ index As Integer,] ByVal dataerror As Integer, response As Integer)Error 事件的语法包含下面部分：部分 描述 
object 对象表达式，其值是“应用于”列表中的一个对象。 
Index Interger，它标识控件数组中的一个控件。 
dataerror Interger，它标识已出现的错误。 
response Interger，将其设置为 0，就可不显示错误信息，参见“设置值”中的描述。 
设置值response 的设置值为：设置值 描述 
0 不显示错误消息。 
1 （缺省值）显示与错误关联的消息。 
说明即使应用程序在代码中处理了运行时错误，但在未执行代码时，错误也仍将出现，比如在单击 Data 控件按钮时，或在通过与被绑定的控件交互作用，以改变当前记录的时候。如果这样的一个操作导致了数据访问错误，则将引发 Error 事件。不为该事件添加代码，这等效于将 response 参数设置为 0。注意 用 ErrorText 属性来检索要显示的错误字符串。

Answer 2

在出错语句前用
on error goto e
......
e:  msgbox "..."