Question

无法插入空行,行必须有一个列值错误，添加不了

Private Sub Command1_Click()
Adodc1.Recordset.AddNew
Adodc1.Recordset.MoveLast
End Sub

Private Sub Command2_Click()
Adodc1.Recordset.Delete (adAffectCurrent)
Adodc1.Recordset.Update
DataGrid1.Refresh
End Sub

Private Sub Command3_Click()
Adodc1.Recordset.Update
DataGrid1.Refresh
End Sub

Private Sub Form_Load()

End Sub

Answer 1

在数据库里把ID字段类型设置为自动增加

追问

还是不行啊，本身id就是自动增加的

追答

AddNew后要修改字段并提交的
你概念模糊
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("商品名称").Value="键盘"
Adodc1.Recordset.Update
Adodc1.Refresh