根據多個條件過濾子表單

Question

我有一個帶有SubForm的表單，我試圖根據兩個日期和一個用戶名的范圍進行過濾（我從3個文本框中獲取標准），部分日期工作正常，但是當我按按鈕啟動過濾器，彈出窗口顯示“輸入參數值”（即使我在文本框中輸入用戶名），我也會輸入用戶名並正確過濾，但是保留的參數和過濾器將不再起作用，直到我關閉再次打開表格，有什么想法嗎？

如果我已經在文本框中輸入了用戶名，我不知道為什么要問我輸入參數。

這是我的代碼：

Private Sub Filter_Click()

    Dim QIL As Form
    Set QIL = Forms("QIL")

If IsNull(Me.username_textbox) Or IsNull(Me.date_from_textbox) Or IsNull(Me.date_to_textbox) Then
    MsgBox "Insert date or username"
Else
    With Me.Superlinks_subform.Form
        .Filter = "[Date] = #" & Format(Me.date_from_textbox, "mm\/dd\/yyyy") & _
     "# AND #" & Format(Me.date_to_textbox, "mm\/dd\/yyyy") & "# AND [User] = " & Me.username_textbox.Value & ""
        .FilterOn = True
    End With
  End If

End Sub

問候

迭戈。

Answer 1

假設[User]字段是一個字符串-包含單引號，如下所示：

[User] = '" & Me.username_textbox.Value & "'"