datagrid添加数据报错
大神快来救救我吧我用的datagrid+adodc+SQL
问题是这样的,点击添加,datagrid.Allowaddnew = True,正常添加数据没问题。
但是如果点击添加后还没有录入数据,如果这时候点击datagrid的其他非编辑区就会报错如图三,因为我的SQL设置了非空列,
到这里程序就不能正常运行下去了
有没有办法把这个错误屏蔽掉,自己设一个错误提示及取消添加?
我试着在datagrid.click事件里加On Error GoTo Handle语句,但是调试的时候我发现程序刚触发这个事件就报错图三了,根本到不了On Error GoTo Handle
Private Sub Command1_Click() '添加
On Error GoTo Handle1 '连续点添加时报错
DG1.AllowDelete = True
DG1.AllowUpdate = True
Adodc_zj.Recordset.AddNew
Exit Sub
Handle1:
Call StrErr
End Sub