需要有关在 MS ACCESS 中使用 SQL & VBA 来 运行 查询的建议

Need advice for using SQL & VBA in MS ACCESS to run a query

请不要提问,这是一个漫长而复杂的故事:-)

我只需要 SQL 字符串中 Me.frmButtons.Form.Button01.caption 的正确语法(带所有引号)。谢谢。这个不行:

Private Sub Button01_Click()
             
Dim strsql As String
            
strsql = "SELECT * FROM table01 WHERE fldName = ""Me.bForm.Form.Button01.caption""    
ORDER BY FldName"

Me.mForm.Form.RecordSource = strsql
Me.mForm.Form.Requery
                
End Sub

在VBA中SQL是一个字符串,不是变量和对象,所以这个对象必须和字符串拼接起来,拼接字符串的字符是“&”

SQL句应该是这样的:

strsql = "SELECT * FROM table01 WHERE fldName = '" & Me.bForm.Form.Button01.caption & "' ORDER BY FldName"

这应该有效:

Private Sub Button01_Click()
             
    Dim strsql As String
            
    strsql = "SELECT * FROM table01 " & _
    "WHERE fldName = '" & Me!bForm.Form!Button01.Caption & "' " & _
    "ORDER BY FldName"
    Me!mForm.Form.RecordSource = strsql
                
End Sub

另外,你应该给你的按钮起有意义的名字。