VisualBasic程序设计案例教程 第8讲 选择结构与语句.pptVIP

选择结构程序设计 第八讲 2课时 教学目标及基本要求 熟练掌握单分支选择结构的基本语句。 熟练掌握二分支选择结构的基本语句。 熟练掌握多分支选择结构的基本语句。 熟练掌握If 语句的嵌套使用。 熟练掌握 Select Case情况选择语句。 教学重点 多分支选择结构程序设计。 If语句的嵌套使用。 Select Case情况选择语句。 教学难点 If 语句的嵌套使用。 教学内容 单分支结构程序设计 二分支结构程序设计 多分支结构程序设计 If语句的嵌套程序设计 Select Case情况选择语句程序设计 单分支结构程序设计 语法格式 If 条件 Then 语句块 End If 语法描述 程序执行到If后开始对条件进行判断，如果条件成立则执 行语句块，之后执行End If后的语句；否则，不执行语句 块，跳到End If后执行其后的语句。 单分支结构程序设计 例1，从键盘上任意输入两个数a和b，判断a与b的大小，且始终输出最大值。 二分支结构程序设计 语法格式 If 条件 Then 语句块1 Else 语句块2 End If 语法描述 程序执行到If后开始对条件进行判断，如果条件成立则执行语句块1，之后跳过语句块2执行End If后的语句；否则，则跳过语句块1，执行语句块2，之后执行End If后的语句。 二分支结构程序设计 二分支结构程序设计 例3,计算分段函数 y = 多分支结构程序设计 多分支结构程序设计 例4，计算分段函数 多分支结构程序设计 例5，计算分段函数f(x) = 多分支结构程序设计 例6，求一元二次方程ax2+bx+c=0 的根。 * * Y N Private Sub Form_Click() a =Val(InputBox (“a”)) b =Val(InputBox (“b”)) If a = b Then Print a End If If a b Then Print b End If End Sub Y N 例2，同样比较a、b两数的大小，始终输出最大数。 Private Sub Form_Click() a = Val(InputBox (“a”)) b = Val(InputBox (“b”)) If a = b Then print a Else Print b End If End Sub 3x+4 6x-7 x≥0 4/x - √3+x2 x0 Private Sub Form_Click() x = Val(InputBox(x)) If x = 0 Then y = (3 * x + 4) / (6 * x - 7) Else y = 4 / x - Sqr(3 + x ^ 2) End If Print y End Sub ● 语法格式 If 条件1 Then 语句块1 ElseIf 条件2 Then 语句块2 … ElseIf 条件n Then 语句块n Else 语句块n+1 End If ●语句功能 当程序运行到If语句时，首先测试条件 1，如果条件1为