标题：[原创]模糊查询继续

1楼

laoshu4569 发表于：2011/7/6 11:32:00

With e.Form.Controls("TextBox2")
    If .Value IsNot Nothing Then
        If Filter > "" And e.Form.Controls("ComboBox4").Value="文件名" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "文件题名 Like '*" & .Value & "*'"
    End If
End With

我已经实现 ComboBox4等于文件名时根据TextBox2的输入进行模糊查询但是现在我还想再加一个文本框的输入也就是一个ComboBox4等于文件名时匹配两个文本框的输入模糊查询可是在写一段上面的

With e.Form.Controls("TextBox3")
    If .Value IsNot Nothing Then
        If Filter > "" And e.Form.Controls("ComboBox4").Value="文件名" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "文件题名 Like '*" & .Value & "*'"
    End If
End With

就不能查了帮忙看看该怎么写

2楼

狐狸爸爸 发表于：2011/7/6 11:35:00

第二段中的And是不是应该改为Or啊

3楼

laoshu4569 发表于：2011/7/6 11:38:00

以下是引用狐狸爸爸在2011-7-6 11:35:00的发言：
第二段中的And是不是应该改为Or啊

不行啊

共3 条记录, 每页显示 10 条, 页签: [1]