用VF编写一个程序:输入密码“AAA”,输入三次错误退出!
发布网友
发布时间：2024-09-30 15:08
共1个回答
热心网友
时间：2024-12-11 17:59
clea
pas=space(3)
a=0
do while .t.
@4,4 say '输入密码:' get pas
read
if uppe(pas)='AAA'
clea
@6,4 say '欢迎!'
wait
retu
else
a=a+1
if a=3
@8,4 say '连续三次错误,退出系统!'
retu
endif
@6,4 say '密码错误,重新输入'
endif
enddo
