第六课 分支结构 课件 (2)

课件10张PPT。第六课 分支结构2海伦公式的流程图结束a+b>c且b+c>a且a+c>b判断三角形是否成立YN输出“不能构成三角形”分支结构认识分支结构2018/10/22分支结构的流程图对给定条件进行判断
条件为真时执行一个分支
条件为假执行另一个分支分支结构在VB中的格式2018/10/22If 条件表达式 Then
语句1（语句块1）
Else
语句2（语句块2）
End if条件表达式通常是关系表达式、逻辑表达式关系表达式指用关系运算符连接两个类型相同的数据组成的表达式。关系运算符有：＞（大于） =（等于）
＜（小于） ＞=（大于等于） <=（小于等于）逻辑表达式指用逻辑运算符连接起来的表达式
逻辑运算符有：and（与） or（或） not（非）2018/10/22Private Sub Command1_Click()
Dim a As Single, b As Single, c As Single
Dim p As Single, s As Single
a = Val(txta.Text)
b = Val(txtb.Text)
c = Val(txtc.Text)
p = (a + b + c) / 2
s = Sqr(p * (p - a) * (p - b) * (p - c))
txtarea.Text = Str(s)
End Sub If Then

Else
End ifa + b > c And a + c > b And b + c > aTxtarea.Text = "不能构成三角形"分支结构的程序实例2018/10/22正确？YN开始输入账号和密码输出登录成功输出登录失败结束程序步骤一：设计窗体2018/10/223个标签控件
2个文本框控件
1个命令按钮程序步骤二：属性设置2018/10/22程序步骤三：代码编写2018/10/22Private Sub Command1_Click()
If ID.Text = "admin" And PWD.Text = "admin123" Then '判断账号密码是否正确
MsgBox ("admin恭喜您登录成功！") '输出对话框登录成功
Else
MsgBox ("您输入账号或密码有误，请重新输入！") '输出对话框登录失败
ID.Text = "" '账号清空
PWD.Text = "" '密码清空

End If
End Sub再 见