窗口中有一SQLQuery查詢表,Fill1與Fill2都有"Email"列,設一鍵二用,篩選Email用戶與冇Email用戶,結果,折騰許久,非得如此設置才成!不明白啊??
其中 Fill1的Email列內容是由SQL的INNER JOIN連接[客戶資料]表而來,
Fill2的Email列內容是由[客戶資料]表賦值而來
[ > '', =''] 與 [ Is not Null, Is Null] 省掉任何一個都不行
Dim s1 As String
Dim t As Table =Tables("查詢_Table1")
vars("bn1") =not vars("bn1")
If t.DataTable.DataCols.Contains("轉賬方式") Then
s1 = iif(vars("bn1") = True," > ''"," =''")
Else
s1 = iif(vars("bn1") = True," Is not Null"," Is Null")
End If
t.filter = "Email" & s1