第十一课:双分支结构
义务教育初中教科书信息技术九年级全一册
请同学们观察一下下面这些登陆界面
程 序 界 面
正确
错误
对 象 属 性
代 码 部 分
Private Sub cmd1_Click()
If txtPassword.Text = "123456" Then
MsgBox ("你好！欢迎加入！")
Else
MsgBox ("对不起，你的密码有误，请重试。")
End If
End Sub
Private Sub cmd2_Click()
End
End Sub
编一个简单的双分支程序有5个步骤
1.分析问题
2.设计程序界面
3.设置对象属性
4.写代码
5.测试并保存程序
If then 语句的一般格式
If 条件表达式 Then
语句组1
Else
语句组2
End if
程序中的MsgBox是VB的一个函数，
调用这个函数时可以在屏幕上显示
一个对话框，一般格式如下：

MsgBox (“要显示的对话”)
作业
编写一个判断成绩是否合格的小程序.(参考界面如下)
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