下面是“查询”按钮的CLICK代码
select kh
EXPS=".T."
if not empty(thisform.text1.value)
   EXPS=EXPS+'and;
   "'+alltrim(thisform.text1.value)+'"$编号'
   endif
if not empty(thisform.text2.value)
   EXPS=EXPS+'and;
   "'+alltrim(thisform.text2.value)+'"$姓名'
   endif
   do case
      case thisform.optiongroup1.value=1
      EXPS=EXPS+"and 性别='男'"
      case thisform.optiongroup1.value=2
      EXPS=EXPS+"and 性别='女'"
      endcase
if not empty()
    EXPS=EXPS+'and;
     职务="'+alltrim()+'"'
   endif
if not empty()
    EXPS=EXPS+'and;
    客户类型="'+alltrim()+'"'
   endif
   if !alltrim(EXPS)==".t."
    set filter to &EXPS
    endif
      count to rec
      if rec=0
      messagebox("指定的查询条件没有选中任何客户",48,"信息提示")
      endif     
 go top
 thisform.refresh  
问题是：输入单个条件查询没问题
当输入两个以上条件查询时就提示“语法错误”指在--set filter to &EXPS
 例如输入“编号和姓名”时查询就出错
希望高手帮忙解决

谢谢楼上的
可是还是不行呢
就是编号和姓名不能和其它条件一起输入查询
一查就出错

我把这改了就没问题了
if not empty(thisform.text1.value)
   EXPS=EXPS+'and;
  编号="'+alltrim(thisform.text1.value)+'"'
   endif
if not empty(thisform.text2.value)
   EXPS=EXPS+'and;
  姓名="'+alltrim(thisform.text2.value)+'"'
   endif