需要有關在 MS ACCESS 中使用 SQL 和 VBA 運行查詢的建議

Question

請不要問問題，這是一個漫長而復雜的故事:-)

我只需要 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

Answer 1

在 VBA 中 SQL 是一個字符串，但不是變量和對象，所以這個對象必須連接到字符串，連接字符串的字符是“&”

SQL 語句應該是這樣的：

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

Answer 2

這應該有效：

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

另外，你應該給你的按鈕起有意義的名字。