要编写一个筛选语句,内容为:
如果“日期1”和“日期2”都不为空,则筛选出:“日期”>“日期1” 和“日期”<“日期2”的数据,我编写后运行不对,请指教,语句如下:
If Not IsNull(Me.日期1) And IsNull(Me.日期2) Then
'有输入
strWhere = strWhere & "([日期] > '*" & Me.日期1 & "*') AND " & "([日期] < '*" & Me.日期2 & "*') AND "
End If
If Not IsNull(Me.日期1) Then strWhere = strWhere & " AND 日期>=#" & Me.日期1 & "#"
If Not IsNull(Me.日期2) Then strWhere = strWhere & " AND 日期<=#" & Me.日期2 & "#"
谢谢楼上各位指教,后来改为以下语句后正确了:
If Not IsNull(Me.日期1) And Not IsNull(Me.日期2) Then
strWhere = strWhere & "([日期] > #" & Me.建期1 & "#) AND "
strWhere = strWhere & "([日期] < #" & Me.日期2 & "#) AND "
End If
但是我对这文本、数字、日期的格式理解还是不太对,因此接下来的一个数字型的,又整不对了(什么*, ' '' 的整不明白了),麻烦再看一下数字的符号如何改的:
If Not IsNull(Me.数字1) And Not IsNull(Me.数字2) Then
strWhere = strWhere & "([数字] > #" & Me.数字1 & "#) AND "
strWhere = strWhere & "([数字] < #" & Me.数字2 & "#) AND "
End If