Question

我必须使用VB或VBA代码已经3年了。我正在使用Microsoft Access工作的项目，我需要获取表单上列出的信息并将其插入表中。我坚持的是代码值的最后一部分。这是我到目前为止所做的。

INSERT Volunteers (Name, Email, Number, Emergency Contact, Emergency Number) VALUES (and this is where I get stuck)

提前谢谢大家！

Answer 1

你想要single-record table append query：

INSERT INTO Volunteers (Name, Email, Number, Emergency Contact, Emergency Number) 
VALUES ("Value1", "Value2", "Value3", "Value4", "Value5")

假设您正在表单的代码隐藏中构造SQL语句，您可以按名称访问控件：

Dim sql As String
sql = _
    "INSERT INTO Volunteers (Name, Email, Number, Emergency Contact, Emergency Number)  " & _
    "VALUES (""" & txbName & """, """ & txbEmail & """, """ & txbNumber & """, """ & txbEmergencyContact & """, """ & txbEmergencyNumber & ")"

（所有这些三引号都是为了在文本字段的最终SQL语句中得到双引号（"）;数字字段不需要任何分隔符，而日期字段使用{{1作为分隔符。）
如果要从其他表单添加值，可以按如下方式访问它们：

和子表单中的值（IIRC）：

Forms!OtherForm!ControlName

有关详细信息，请参阅here。

将表单中的数据插入表中

1 个答案: