窗体筛选不支持 in 函数吗

t360103

代码如下，但不支持 in 函数，请各位大哥指点。

Private Sub pro_afterupdate()
Dim StrFlt
StrFlt = "姓名 in 张山王武李四 "
If StrFlt <> "" Then
StrFlt = Left(StrFlt, Len(StrFlt) - 5)
End If
Me.CFDetFG.Form.filter = StrFlt
Me.CFDetFG.Form.FilterOn = True
End Sub

只想通过窗体筛选方式，不想通过改变数据源的SQL语句方式。

ACMAIN_CHM

StrFlt = "instr('张山王武李四',姓名)>0"



******************
*  一切皆有可能  *
******************
.
ACMAIN - Access论坛回贴准则（个人）.
.
同一贴子不回复第二次
.
QQ群 48866293 / 12035577 / 7440532 / 13666209
http://www.office-cn.net/vvb/ .
http://www.accessbbs.cn/bbs/index.php .
http://www.accessoft.com/bbs/index.asp .
http://www.access-programmers.co.uk/forums .
.
http://www.office-cn.net/home/space.php?uid=141646 .

Henry D. Sy

in应该不是函数