主题：[求助]学习窗口筛选.table的错误

打开casestuduy的窗口筛选TABLE时的时间筛选时总提示附件的错误。

请老师们告知什么问题

此主题相关图片如下：qq截图20130912121631.jpg


此主题相关图片如下：qq截图20130912122042.jpg


此主题相关图片如下：qq截图20130912122051.jpg

合成的表达式有问题，你可以用mssagbeox.show显示下你合成的筛选表达式，就知道问题所在了

casestuduy里的东西都没有改过啊，怎么能错误呢，难道是故意设置的错误？

 

Dim Filter As String
With e.Form.Controls("cmbProduct")
    If .Value IsNot Nothing Then
        Filter = "产品 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("cmbCustomer")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "客户 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("cmbEmployee")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "雇员 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("StartDate")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "日期 >= #" & .Value & "#"
    End If
End With
With e.Form.Controls("EndDate")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "日期 <= #" & .Value & "#"

你好,你这个原因看起来是因为你系统日期格式有问题导致,请检查一下你是否把系统日期格式设置为带有星期几的了.

果真是这个问题，谢谢了啊！~~~~~