我有一个带有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问候
迭戈。
发布于 2019-08-14 01:32:50
假设字段用户是字符串-包括如下所示的单引号:
[User] = '" & Me.username_textbox.Value & "'"https://stackoverflow.com/questions/57486863
复制相似问题