全国计算机考试第4章 VB程序控制结构课件.ppt

第4章 VB程序控制结构;4.1 算法概述;4.1 算法概述;算法的特性;算法的描述;图形符号表;基本算法结构;顺序结构;补全下面的流程图----开始(结束)输入(输出); 循环结构;三种基本结构共同特点：;4.2 顺序结构程序设计;1. 赋值语句;2.求梯形面积;重点算法：设计算法交换两个变量a和b的值;求水仙花数;与Print方法有关的Tab函数;;4.3 选择结构;1.单行结构条件语句;单行结构语句示例;2.块结构条件语句（If语句块）;单分支块;双分支块结构;多分支块结构;If …… Then;块结构语句示例;IF条件结构的应用;【例5】模拟Word调色器功能; Select Case e Case c1 A 组语句 Case c2 B 组语句 …… Case Else n组语句 End Select ;测试项可以是三种形式的组合，如4，7 to 19,Is20 即一个case语句中允许有多个测试项，项与项之间用逗号分隔。 本结构执行方式： 先求测试表达式的值，接着逐个检查每个case语句的测试项，如果测试表达式的值满足某个测试项中的任意一个测试内容，系统就执行该case语句下的那组语句；若没有一个测试项满足要求，就执行Case Else 下的语句。;变量strC中存放了一个字符，判断该字符类型。 用Select Case语句实现: Select Case strC Case a To z，A To Z Print strC + 是字母字符 Case 0 To 9 Print strC + 是数字字符 Case Else Print strC + 其他字符 End Select ;Private Sub Command1_Click() Dim x As Integer x = Val(Text1.Text) Select Case x Case Is 1 Text2.Text = 这是小于1的数 Case 1 To 10 Text2.Text = 这是1到10之间的数 Case Else Text2.Text = 这是大于10的数 End Select End Sub;Select case 与IF嵌套;3.IIf函数;常见错误 1．在选择结构中缺少配对的结束语句 对多行式的If块语句中，应有配对的 End If语句结束。 2. 多边选择ElseIf关键字的书写和条件表达式的表示 ElseIf 不要写成Else If； 多个条件表达式次序问题 3. Select Case语句的使用 Select Case 后不能出现多个变量；Case子句后不能出现变量;3.4.7 数据输入----InputBox函数;认识InputBox函数;;;;;例题; MsgBox函数和MsgBox语句;1 MsgBox语句;;;;;;2 MsgBox函数;例题解析