发现大部分黑白的朋友都不会编程(15)

主要是对编程初学者提供资料

同小异. 要注意的是嵌套的if语句, 清仔细读一下这个程序, 可能比较难懂, 也请你试着自己设计一下类似的程序.

其实, 要在do...loop加上验证的功能, 并不一定要用if, 我们可以直接利用do. 我来介绍一下while关键字, while可以放

在do或者是loop后面, 然后再接一个表达式, 当表达式的值为true的时候(表达式成立),才运行循环体.我们来看一下修改后的 程序"

dim a,ctr ctr=0

const pass="pas123_" do while ctr<3

a=inputbox("请输入密码") if a=pass then msgbox("认证成功")

msgbox("(你可以在这里加一段成功后得到的信息)") exit do else

ctr=ctr+1 '如果密码出错就增加一次错误认证计数 msgbox("认证出错, 请检查密码") end if loop

dim a,ctr ctr=0

const pass="pas123_" do

a=inputbox("请输入密码") if a=pass then msgbox("认证成功")

msgbox("(你可以在这里加一段成功后得到的信息)") exit do else

ctr=ctr+1 '如果密码出错就增加一次错误认证计数 msgbox("认证出错, 请检查密码") end if

loop while ctr<3

功能是一样的, 为什么要放在loop后面呢? 你把ctr的值改成3就知道了, while在do后面的程序会直接退出, 而在loop后面

还会允许一次认证, 到了loop才结束.和while相反的是until, 用法和while一样, 不过他只有当后面的表达式的值为false(表

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库发现大部分黑白的朋友都不会编程(15)在线全文阅读。