VB 中datagrid中数据添加的问题

来源:百度知道 编辑:UC知道 时间:2024/05/10 07:50:32
我在窗体上建立一个datagrid,
其数据是用adodc1上数据库里的数据连接起来的
,,,我在程序上添加数据时,datagrid出现一行空白的,要输入添加的数据
,,,可是我不想添加数据时,按取消添加,然后就会出错.."无法插入空白行,必须至少有一列值表"
我的程序是这么写的
Private Sub Command2_Click()
Adodc1.Recordset.AddNew
Command2.Enabled = False

Command3.Enabled = True

End Sub

Private Sub Command3_Click()
On Error GoTo errh
a = MsgBox("确实要增加当前的记录吗?", vbYesNo)
If a = vbYes Then
Adodc1.Recordset.Update
Else
Adodc1.Recordset.CancelUpdate
End If
Command2.Enabled = True
Command3.Enabled = False
errh:
MsgBox Err.Description
请问要怎么觉得???????
可是 ,,如果我在 datagrid中的空白行输入数据,,在"确认添加"的按钮中点"否",,也是会把数据添加进去还有数据库的表中...
怎么会这样

'点取消什么也不做就对了
Private Sub Command3_Click()
On Error GoTo errh
a = MsgBox("确实要增加当前的记录吗?", vbYesNo)
If a = vbYes Then
Adodc1.Recordset.Update
Else
exit sub
End If
Command2.Enabled = True
Command3.Enabled = False
errh:
MsgBox Err.Description

你看下你DATAGRID中的字段名和你数据库中的字段名是不是一样。。估计是字段名不一定。
或者是说你数据库中的字段不允许为空。