[求助]表单还有问题~
这是表单中针对文本框写的一段代码
作用是在文本框中输入的信息搜索在表中bh字段中是否存在，若存在出现提示信息
过程：Valid
—————————————————————————————————————————
close tables
use ry
cbh1 = thisform.pageframe1.page1.text1.value
if len(allt(cbh1)) != 6
messagebox("编号长度不够！")
this.value=" "
return .f.
endif
go top
locate for bh = cbh1
if found()
messagebox("数据库中已存在此编号人员")
this.value=" "
return .f.
endif
————————————————————————————————————
运行后没有错误，输入bh字段中已存在的信息时，提示未弹出，我也不知道问题出在哪里，请高手指教
谢谢
