请问这段代码有问题吗?
请问这段代码有问题吗?运行后提示“操作符/操作类型不匹配”!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