设计表单如上图：
1、数据环境：有一个视图(prtst)、有一个表(dwdm)。
2、combo1的rowsourcetype=field rowsource= dwdm.dwmc

3、过滤按钮的代码是：

schfilter=[.t.]
IF NOT EMPTY(ALLTRIM(THISFORM.combo1.Value))
SchFilter=SchFilter+[.AND. dwmc=']+THISFORM.combo1.VALUE+[']
ENDIF
IF NOT EMPTY(thisform.text1.Value)
SchFilter=SchFilter+[.AND. xm=']+THISFORM.text1.VALUE+[']
ENDIF
IF NOT EMPTY(thisform.text2.Value)
schfilter=schfilter+" and xjh='"+ALLTRIM(thisform.text2.Value)+" '"
ENDIF

SELECT prtst
SET FILTER TO
SET FILTER TO &schfilter
GO top
thisform.Refresh

这种方法查询，在虎哥的博客里也介绍过啊！我的dwdm库里存的是所以学校的名称，但查询结果总是不对的。请fown、虎哥等朋友帮忙诊断一下吧！！！！！

如果dwmc,xm,xjh都是字符型字段,且对应的THISFORM.combo1.Value,thisform.text1.Value,thisform.text2.Value为字符型数据,那么程序为
schfilter=[.t.]
IF NOT EMPTY(ALLTRIM(THISFORM.combo1.Value))
SchFilter=SchFilter+[.AND. dwmc=']+ALLTRIM(THISFORM.combo1.VALUE)+[']
ENDIF
IF NOT EMPTY(thisform.text1.Value)
SchFilter=SchFilter+[.AND. xm=']+ALLTRIM(THISFORM.text1.VALUE)+[']
ENDIF
IF NOT EMPTY(thisform.text2.Value)
schfilter=schfilter+" and xjh='"+ALLTRIM(thisform.text2.Value)+" '"
ENDIF
SELECT prtst
*SET FILTER TO &&可删除掉
SET FILTER TO &schfilter
GO top
thisform.Refresh
其他好象没有问题,但上述程序在"查询"命令按钮里执行,且用GRID显示数据,才能看出效果.