主题:避免输入编号重复问题
高手,你好,我写一个表单,在上面有几个文本框,现在在存盘前要先判断一下某个编号是否已经存在。
我用了以前帖子上的 go top
loca for allt(编号)==allt(thisform.text1.vlaue)
if !eof()
appen blan
replace 编号 with thisform.text1.vlaue
else
messagebox("")
endif
thisform.text1.setfocus
现在问题是我输入重复的编号,也能存盘,信息框不会出现。
我用了以前帖子上的 go top
loca for allt(编号)==allt(thisform.text1.vlaue)
if !eof()
appen blan
replace 编号 with thisform.text1.vlaue
else
messagebox("")
endif
thisform.text1.setfocus
现在问题是我输入重复的编号,也能存盘,信息框不会出现。