——查询条件默认为“.T。”
seltj=".T."
——如果txt编号文本框中的值非空
if .on.empty(alltrim(thisform.txt编号.value))
seltj=seltj+"AND '"+alltrim(thisform.txt编号.value)+"'$编号"
ENDIF
——如果txt名称文本框中的值非空
if .on.empty(alltrim(thisform.txt名称.value))
seltj=seltj+"AND '"+alltrim(thisform.txt名称.value)+"'$名称"
ENDIF
——选择客户信息表所在工作区
select Client
——清除可能存在的过滤条件
set filter to
——设置过滤条件
set filter to &seltj
——刷新表单
thisform.refresh


[请各位高手帮帮忙啊！拜托了]