Question

我是Access的新手。我已经制作了一个表格来将数据放在表格中。我在userform中有一个组合框和一个文本框。

以下是我的代码：

Private Sub add_Click()
'Add Data to the GroupHeads Table
CurrentDb.Execute "Insert into GroupHeads(AccountHeads, GroupHeads)" & "  Values(" & Me.cboaccounthead & ", '" & Me.txtgrouphead & "')"

End Sub

请查看并告知其给出运行时错误的原因。

的问候。萨勒曼

Answer 1

如果表中的两列都是文本，则两个值都需要用单引号括起来，因此您需要：

CurrentDb.Execute "Insert into GroupHeads(AccountHeads, GroupHeads) " & _
    "Values('" & Replace(Me.cboaccounthead, "'", "''") & "', " & _
    "'" & Replace(Me.txtgrouphead, "'", "''") & "')"

运行时错误3061预期参数太少1

1 个答案: