请问这段代码有问题吗？运行后提示“操作符/操作类型不匹配”！
local findstr,oldrecord
oldrecord=recno()
set exact off
do case
case thisform.findtype.value=1
   findstr=alltri(thisform.findkey.value)+"$xm"
case thisform.findtype.value=2
   findstr=alltri(thisform.findkey.value)+"$scbh"
endcase
sele txxx
set filt to &findstr
go top
do while .not.eof()
  txxx.refresh
  thisform.windowstate=1
  if messagebox("是此人吗？",4+32,"离退休信息核对")=6
    exit
  else
    skip
    txxx.refresh
  endif
  thisform.windowstate=0
enddo
if eof()
  messagebox("未找到此人吗？",4+32,"离退休信息核对")
  go oldrecord
endif
set filt to
txxx.refresh
thisform.release

在表单的init事件中放入以下代码，保证文本框接收数据的格式正确：
thisform.findkey.value=""
thisform.findtype.value=0

非常感谢！我已经将另一张表单“离退休信息核对”的NAME设为“TXXX”了，可是运行后还显示“找不到对象TXXX”！

要将表单的文件名改成“离退休信息核对”（对应的表单文件：离退休信息核对.SCT、离退休信息核对.SCX)

txxx似乎是表单集中的一个表单吧?如果是应该这样引用 thisformset.txxx.refresh；如果不是，要用txxx的文件名.refresh来引用，不是用它的name属性来引用。
另外，你的整体设计思路似乎不是太好。
你好像要在一个表中找到一些记录，提供了几种匹配方式供选择。比较简单，而且还有扩展性的方法是生成一个新数据表再把这个数据放到一显示结果表格对应的临时表中。这样通用性更好。

这样做是不是好些？
sele * from txxx into dbf ls where 查询条件
do form txxx
在txxx的load事件中加上
if used('cxjgtmp')
    use in cxjgtmp
endif
select txxx
=afield(tmpstr)
create cursor cxjgtmp from array tmpstr
在初始化事件中加入
thisform.grid1.recordsource='cxjgtmp'
thisform.grid1.column1.controlsource='cxjgtmp.xm'
thisform.grid1.column2.controlsource='cxjgtmp.……'
……
sele cxjgtmp
append from ls
go top
* cxjgtmp &&txxx表单中显示结果的表格对应的临时表