使用VBA而不是SQL进行值查找？

是否可以只使用VBA而不使用SQL来复制

txtSCDate.Value = "SELECT [SC Date] FROM [Stock Conversion] WHERE [SCID] = " & txtSCNumber.Value & ";"

如果不是，那么如何从VBA运行SQL

提前感谢,， Bob P

您可以使用DLookUp：

txtSCDate.Value = DlookUp("[SC Date]","[Stock Conversion]","SCID = " _
                & txtSCNumber.Value)

请注意，您可以将文本框的控制源设置为域函数，如DLookUp

如果要使用SQL，则：

Dim rs As Recordset

sSQL = "SELECT [SC Date] FROM [Stock Conversion] WHERE SCID = " _
     & txtSCNumber.Value
Set rs = CurrentDB.Openrecordset(sSQL)
Me.txtSCNumber = rs![SC date]

---

我意识到这不是您的设计，但在可能的情况下，在字段（列）和表名中去掉空格。这意味着你可以减少方括号的使用，方括号只有在有空格、特殊字符或保留字时才需要。