双分支结构.ppt

第十一课:双分支结构 程 序 界 面 对 象 属 性 代 码 部 分 Private Sub cmd1_Click() If txtPassword.Text = 123456 Then MsgBox (你好！欢迎加入！) Else MsgBox (对不起，你的密码有误，请重试。) End If End Sub 编一个简单的双分支程序有5个步骤 1.分析问题 2.设计程序界面 3.设置对象属性 4.写代码 5.测试并保存程序 If then 语句的一般格式 作业 private Sub Command1_Click() Dim a As Integer a = Val(Text1.Text) If a 60 Then Label1.Caption = 不合格 Else Label1.Caption = 合格 End If End Sub 授课老师:买买提明 义务教育初中教科书信息技术九年级全一册 (编写一个小程序) 初中信息1232-3班 请同学们观察一下下面这些登陆界面 正确 错误 cmd2 名称 command2 退出 caption 确定 Caption cmd1 名称 Command1 空 名称 Text1 请输入密码: caption lb1 名称 Label1 身份验证 caption Form1 属性值 属性 对象 Private Sub cmd2_Click() End End Sub If 条件表达式 Then 语句组1 Else 语句组2 End if 条件是否成立 执行另一个支分 执行一个支分 成立 不成立 程序中的MsgBox是VB的一个函数， 调用这个函数时可以在屏幕上显示 一个对话框，一般格式如下： MsgBox (“要显示的对话”) 编写一个判断成绩是否合格的小程序.(参考界面如下) 授课老师:买买提明