vb分支结构.ppt

三、分支的嵌套 If 条件 then 语句块 If 条件 then 语句 else 语句 endif Else 语句块 endif If 条件 then 语句块 Else 语句块 If 条件 then 语句 else 语句 endif endif Y= 1 x0 -1 x0 0 x=0 If x0 then if x=0 then y=1 if x=0 then Else y=0 if x=0 then else y=0 y=1 else endif y=-1 else Endif y=-1 endif endif Print y print y 练习:输出三个文本框中的最大数 a = Val(Text1) b = Val(Text2) c = Val(Text3) If a b Then If a c Then Print a Else Print c End If Else If b c Then Print b Else Print c End If End If 例2：判断学生成绩等级 a = Val(Text1.Text) if a = 90 Then Text2.Text = 优秀 ElseIf a = 80 Then Text2.Text = 良好 ElseIf a = 70 Then Text2.Text = 中等 ElseIf a = 60 Then Text2.Text = 及格 Else Text2.Text = 不及格 End If * . 基本控制结构 顺序结构、分支结构、循环结构 .1 顺序结构 自上向下地顺序执行各条语句 例: a=19 b=“hello” Text1.text=“你好” Label1.caption=“姓名” .2 分支结构 程序依照条件而走不同的支路。 一、If...Then 语句 用 If...Then 结构可以有条件地执行其结构内的一条或多条语句。 语法格式： If 条件表达式 Then 多条语句 End If 例1：如果文本框输入的内容为“hello”，则在屏幕上打印“ok”。 If Text1.Text=“hello” Then Form1.Print “ok” End If 例2：如果两个文本框输入的内容相同，则在屏幕上打印“ok” 。 If Text1.Text= Text2.Text Then Form1.Print “ok” End If 例3：对于任意一个数，如果它大于3，则在窗体上打印这个数。 a = Val(Text1.Text) If a 3 Then Form1.Print a End If 例4：对于任意一个数，如果它不等于0，则在窗体上打印这个数。 a = Val(Text1.Text) If a0 Then Form1.Print a End If 例5：对于任意两个数，如果第一个数大于第二个数，则在窗体上打印第一个数。 a = Val(Text1.Text) b = Val(Text2.Text) If a b Then For