Adodc控件的添加记录问题
本来是做asp.net的,帮朋友用VB6写一个小的CS软件,这两天熟悉了一下,虽然很多东西不难理解,但一时之间找到原因还真不好找。
我用Adodc控制实现增删改查的功能,在增加时,先要用到AddNew,在DataGrid里增加一行,如果没有输入数据再点击一次按钮,会报错“无法插入空行”
Private Sub Command1_Click()
On Error Resume Next
Adodc1.Recordset.AddNew
Exit Sub
End Sub
Dim blnAdding As Boolean
Private Sub Command1_Click()
If blnAdding Then Exit Sub
Adodc1.Recordset.AddNew
blnAdding = True
End Sub