If Filter > "" Then
Filter = Filter & " or "
End If
If drs11(n1)("用户列") = True And drs11(n1).IsNull("列内容") Then
Filter = Filter & drs11(n1)("列名") & " = '" & _UserName & "'"
ElseIf drs11(n1)("用户列") = True And drs11(n1).IsNull("列内容") = False Then
Filter = Filter & drs11(n1)("列名") & " In ('" & drs11(n1)("列内容").replace(",", "','") & "')"
Else
Filter = Filter & drs11(n1)("列名") & " In ('" & drs11(n1)("列内容").replace(",", "','") & "')"
End If
标颜色处需要把Filter = Filter & drs11(n1)("列名") & " = '" & _UserName & "'"和Filter = Filter & drs11(n1)("列名") & " In ('" & drs11(n1)("列内容").replace(",", "','") & "')"两个或条件组合起来，要怎么写
加好友 
发短信
Post By：2023/10/13 19:49:00 [显示全部帖子]
