Question

VB中ADO控件怎么进行插入啊？

这是我写的代码：
Private Sub COK_Click()
a:
If TNR.Text = Null Then
MsgBox "没有内容！"
GoTo a
b:
ElseIf TJE.Text = Null Then
MsgBox "金额是多少？"
GoTo b
ElseIf bz = False Then
je = 0 - TJE.Text
End If
time = Date
Ado.Recordset.MoveLast
bfye = TJE.Text + T.Text
Ado.Recordset.AddNew
Ado.Recordset.Source = "insert 班费使用记录 (日期,内容,金额,班费余额,备注) values (#" & time & "#," & TNR.Text & "," & TJE.Text & "," & bfye & "," & TBZ.Text & ")"
End Sub

Private Sub Form_Load()
Dim je As Currency
Dim bfye As Currency
Dim bz As Boolean
Dim time As Date
End Sub

Private Sub OSR_Click()
bz = True
End Sub

Private Sub OZC_Click()
bz = False
End Sub

Private Sub TJE_Change()
COK.Enabled = True
CTJ.Enabled = True
End Sub

其中，ADO控件是直接访问“仪表维护班各项公款记录.mdb”文件的。
运行后，它老说对象打开时不允许操作。我错在哪了？

Answer 1

先要open表.还要把数据库文件和控件连好。