——查询条件默认为“.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


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

你看一下提示的是哪一行的错误不就行了？

.on.empty(alltrim(thisform.txt编号.value))

为什么不用？alltrim(thisform.txt编号.value)=“”？？？？

seltj=".T."
if .not.empty(thisform.txt编号.value)
  seltj=seltj+" AND '"+alltrim(thisform.txt编号.value)+"'$编号"
ENDIF
if .not.empty(thisform.txt名称.value)
  seltj=seltj+" AND '"+alltrim(thisform.txt名称.value)+"'$名称"
ENDIF
select Client
if seltj=='.T.'
  Set filter to
else
  set filter to &seltj
endif
go top
thisform.refresh
注意：(1)2个and的前面都加上了空格;(2)还得检查2个文本框及2个字段是否为字符型。