请问在窗体上查询，条件为空时默认为全部的写法，谢谢！

竹田品烟　发表于：2016-09-07 11:33:42 　

现需要窗体上以文本框内条件查询，生成记录集，但条件为空时默认为全部，此时这个*符号该怎么写？

Private Sub Qry_Click

dim rs as ADODB.Recordset

dim sql as String

sql = "select * from [BM] where [BM].[Operator] like '" & IIF(IsNull(Me.Operator),"*",Me.Operator) & "' "

...

按上述 IIF(IsNull(Me.Operator),"*",Me.Operator) 这样的写法记录集为空，但显然不对

按 IIF(IsNull(Me.Operator),*,Me.Operator) 或 IIF(IsNull(Me.Operator),'*',Me.Operator) 这样又会报错

问题应该比较基础，莫要见笑

KevinFan 发表于：2016-09-07 11:56:59

If Me.Operator is Null Then

sql = "select * from [BM] where [BM].[Operator]

esle
sql = "select * from [BM] where [BM].[Operator] like '" & Me.Operator & "' "

End If
这样试试。

KevinFan 发表于：2016-09-07 11:57:32

If Me.Operator is Null Then

sql = "select * from [BM] where [BM].[Operator]

esle
sql = "select * from [BM] where [BM].[Operator] like '" & Me.Operator & "' "

End If
这样试试。

KevinFan 发表于：2016-09-07 11:58:25

竹田品烟发表于：2016-09-07 12:33:30

谢谢，但查询条件很多时会比较复杂吧，希望有更好的办法

yuhong 发表于：2016-09-07 13:54:00

If Nz(..........) <> "" Then
........
Else
Me.子窗体.SetFocus
DoCmd.ShowAllRecords
End If

总记录：5篇页次：1/1 9 1 :

Access交流中心