Question

vfp找不到列变量

public ryflag
public rybh
rybh="编号"
if alltrim(thisform.Text1.text)=="" .or. alltrim(thisform.Text2.text)==""
messagebox("请输入用户名密码",0,"提醒")
thisform.text1.setfocus
return
endif
do case
case thisform.optiongroup1.value=1
select 管理员
ryflag="管理员"
case thisform.optiongroup1.value=2
select 教师
ryflag="教师"
case thisform.optiongroup1.value=3
select 学生
ryflag="学生"
endcase
rybh=alltrim(thisform.text1.value)
locate for alltrim(编号)==rybh
if found()
if alltrim(密码)<>alltrim(thisform.text2.value)
messagebox("密码输入出错",0,"提醒")
return
else
thisform.release
do form 主表单 with ryflag,rybh
endif
else
messagebox("用户名错误",0,"提醒")
return
endif
找不到变量rybh

Answer 1

你验证密码时:
locate for alltrim(编号)==rybh

这里的编号是哪个表的? 在这之前你改变了当前表为学生表. 当然找不到字段了