急！！！！！vfp的问题

显示全部楼层 · 2008-5-17 21:18:32

在第一行加上：n=0否则n=n+1会出错。变量未赋值前默认为：.F.

千问 · 2008-5-17 21:18:32

在第一行加上： n=0 否则n=n+1会出错。变量未赋值前默认为：.F.另外就是N=N+1的位置也不对应该在thisform.text2.SetFocus 的下面空行处。否则这个N就不能用来控制密码次数，你肯定是复制的时候弄错了做成这样n=0 select 管理员 locate for ALLTRIM(管理员.xingming)==alltrim(thisform.combo1.value) if found() .And. ALLTRIM(管理员.mima)==alltrim(thisform.text2.value) do d:\大学课程\计算机\信管\06060821\mymenu.mpr release thisform else if n<3 messagebox("操作员密码错！"+Chr(13)+"请再次输入！",48,"警告") thisform.text2.Value ="" thisform.text2.SetFocus N=N+1else messagebox("对不起，您已错三次,系统即将关闭!",48,"严重警告") thisform.release endif endif