初中信息技术浙教版九年级全册第六课 分支结构授课ppt课件

这是一份初中信息技术浙教版九年级全册第六课 分支结构授课ppt课件，共10页。PPT课件主要包含了海伦公式的流程图，判断三角形是否成立，分支结构，认识分支结构，分支结构的程序实例等内容，欢迎下载使用。

a+b>c且b+c>a且a+c>b
输出“不能构成三角形”
对给定条件进行判断条件为真时执行一个分支条件为假执行另一个分支
分支结构在VB中的格式
If 条件表达式 Then 语句1（语句块1）Else 语句2（语句块2）End if
条件表达式通常是关系表达式、逻辑表达式
关系表达式指用关系运算符连接两个类型相同的数据组成的表达式。关系运算符有：＞（大于） =（等于） ＜（小于） ＞=（大于等于） <=（小于等于）
逻辑表达式指用逻辑运算符连接起来的表达式逻辑运算符有：and（与） r（或） nt（非）
Private Sub Cmmand1_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 if
a + b > c And a + c > b And b + c > a
Txtarea.Text = "不能构成三角形"
3个标签控件2个文本框控件1个命令按钮
Private Sub Cmmand1_Click() If ID.Text = "admin" And PWD.Text = "admin123" Then '判断账号密码是否正确 MsgBx ("admin恭喜您登录成功！") '输出对话框登录成功 Else MsgBx ("您输入账号或密码有误，请重新输入！") '输出对话框登录失败 ID.Text = "" '账号清空 PWD.Text = "" '密码清空 End IfEnd Sub