代码运行出错了!
use \图书管理系统\读者情况表.DBFdimension a(9999)
for i=1 to 9999
go 1
store 借书证号 to a(i)
endfor
if a==alltrim(thisform.text3.value)
alltrim(thisform.text3.value)
else
nAnswer=messagebox("读者不存在,请添加读者!",42,"错误信息")
endif
cancel
以上是我在 text1 的 vald 属性里面添加的代码,但是我一运行就出错我实在是找不是错误的原因!
还请各位看看到底是错在哪里!先谢过了!
为什么我输入了正确的借书证号还是会弹出"读者不存在,请添加读者!"的提示信息呢?