Question

我在这上花了两天时间，我似乎无法解决它。

这是我在VBA中的当前代码，但仅适用于一个字段。我尝试修改它以使其适用于多个字段但未能这样做。

Dim SQL as String

SQL = "INSERT INTO tblProviders (Provider) " _
& "VALUES(" _
& "'" & Me!txtProvider & "' ) "

DoCmd.RunSQL

如果tblProviders是我的选择表，Provider是我的字段，txtProvider是用户插入信息的地方。

如果我执行以下操作，则会收到错误：

Dim SQL As String

SQL = "INSERT INTO tblProviders (Provider, Adress) VALUES (" & Me.txtProvider & "," & Me.txtAdress & ")"

DoCmd.RunSQL SQL

以下内容不起作用，因为它只创建了2个新行，而不是将它们全部添加到同一行：

Dim SQL1 as String

SQL1 = "INSERT INTO tblProviders (Provider) " _
& "VALUES(" _
& "'" & Me!txtProvider & "' ) "

DoCmd.RunSQL SQL1

Dim SQL as String

SQL2 = "INSERT INTO tblProviders (Provider) " _
& "VALUES(" _
& "'" & Me!txtAdres & "' ) "

DoCmd.RunSQL SQL2

Answer 1

构建字符串时，需要在最终的SQL语句中规划引号。试试这个：

SQL = "INSERT INTO tblProviders (Provider, Adress) VALUES ('" & _
         Me.txtProvider & "', '" & Me.txtAdress & "')"  
'print the result for control
debug.Print SQL

我在双引号'中使用单引号"，例如"'Hi'"。
也可以加倍内部双引号，如"""Hi"""，但我发现它不可读。

如何在SQL（ms Access）中的同一行中添加多个字段？

1 个答案: