数据库无法添加记录
我在学数据库,买了一本书,照书上的例子操作。有一个例子,界面如图
添加按钮代码为:
Private Sub Command5_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Adodc1.Recordset.AddNew
Command1.Enabled = False
Command2.Enabled = False
Command3.Enabled = False
Command4.Enabled = False
Command5.Enabled = False
Command6.Enabled = False
Command7.Enabled = False
Command8.Enabled = True
Command9.Enabled = True
End Sub
可是添加不上。
请问高手,如何解决?谢谢!