Question

VFP中的一道题 要考试的 拜托大侠指点一二!!!!!

gc484.scx的功能是：该表单设计成一个登陆界面，其上有2个标签控件、2个文本框、1个命令按钮，当输
入用户名(设置为hxhy)和密码(设置为5921)后，单击“确认”按钮，检验输入是否正确，如果正确，就显示
“Welcome......”；如果不正确，则显示“用户名或密码不对，请重新输入”；若两次输入不正确，则显示
“用户名或密码不对，登陆失败”。要求：
1) 新建表单属性num，用于记录本次登陆的次数，默认值设置为0；设置文本框Text2的InputMask属性和
PasswordChar属性；
2) 在已编写的Command1的Click事件代码中有2个错误，请调试改正，调试改正中不得增删语句。
题中涉及的文件所在位置均指考生目录（即Z:盘）。

if thisform.text1.text="hxhy" and thisform.text2.text="5921" then
thisform.caption= "Welcome......"
else
thisform.caption= "用户名或密码不对，请重新输入"
thisform.num=ThisForm.num+2
endif
If ThisForm.num=5 then
thisform.caption= "用户名或密码不对，登陆失败"
thisform.release
endif

Answer 1

我上机试过了，改一处就正确了。

if thisform.text1.text="hxhy" and thisform.text2.text="5921" then
thisform.caption= "Welcome......"
else
thisform.caption= "用户名或密码不对，请重新输入"
thisform.num=ThisForm.num+2
endif
If ThisForm.num=5 then 改为：if thisform.num>2 then
thisform.caption= "用户名或密码不对，登陆失败"
thisform.release
endif

因为你设置的num属性的初值为0,num=0时候，输入第一次，num=2时输入第2次，结束输入。

Answer 2

if thisform.text1.caption="hxhy" and thisform.text2.caption="5921" then
thisform.caption= "Welcome......"
else
thisform.caption= "用户名或密码不对，请重新输入"
thisform.num=ThisForm.num+2
endif
If ThisForm.num=4 then
thisform.caption= "用户名或密码不对，登陆失败"
thisform.release
endif

Answer 3

if thisform.text1.value="hxhy" and thisform.text2.value="5921" then &&这里两个text改为value
thisform.caption= "Welcome......"
else
thisform.caption= "用户名或密码不对，请重新输入"
thisform.num=ThisForm.num+2
endif
If ThisForm.num=4 then &&5改为4
thisform.caption= "用户名或密码不对，登陆失败"
thisform.release
endif