编程开发论坛 - Powered by Discuz! Board

标题: VF的高手来下，关于循环问题 [打印本页]

作者: 泡泡猫 时间: 2006-12-3 20:12 标题: VF的高手来下，关于循环问题

我想在登陆框中实现，用户名或密码输入三次错误会被强制退出，如何我下面的代码中会出现不管正不正确都会被强制退出，请帮我解决下，谢谢
sele pword
if allt(thisform.text2.value)==""
  thisform.label3.caption="请输入系统登录用户名！！"
  thisform.text2.setfocus
  else
  thisform.label3.caption=""
if allt(thisform.text1.value)==""
  thisform.label2.caption="请输入系统登录密码！！"
  thisform.text1.setfocus
  else
  thisform.label2.caption=""
for n=1 to 3
if allt(姓名)=allt(thisform.text2.value)
if allt(密码)=allt(thisform.text1.value)
   thisform.release
   do menu.mpr
   *clear events
   else
   thisform.label2.caption="密码错误，请重新输入！"
   thisform.text1.value=""
   thisform.text1.setfocus
   loop
endif
else
      thisform.label3.caption="用户名错误，请重新输入！"
      thisform.text1.value=""
      thisform.text2.value=""
      thisform.text2.setfocus
   loop
endif
endfor
      thisform.text1.enabled=.f.
      thisform.text2.enabled=.f.
      thisform.command1.enabled=.f.
      messagebox("非法使用，程序即将关闭！",0+16,"警告")
      thisform.release
      quit
endif
endif

作者: Nothing 时间: 2006-12-10 11:55

你循环完了之后，都执行了退出的程序。

你可以加一个变量，在正确的时候，直接退出循环，然后正确了就不再quit了

欢迎光临编程开发论坛 (http://bbs.lihuasoft.net/)