Visual Basic程序设计(等级考试版)中ppt193.ppt

Visual Basic程序设计(等级考试版) 史春联 主 编 第1章 Visual Basic程序开发环境 第2章 对象及其操作 第3章 简单程序设计 第4章 Visual Basic 程序设计基础 第5章 数据的输入输出 第6章 控制结构 第7章 数组 第8章 常用标准控件 第9章 过程 第10章 键盘与鼠标事件过程 第11章 菜单程序设计 第12章 Visual Basic程序开发环境 第13章 多重窗体程序设计环境应用 第14章 文件处理 第15章 多媒体应用开发 第16章 数据库编程初步 第6章 控制结构 程序的结构与流程图 选择控制结构 循环控制结构 Goto 型控制 小型案例-文本统计 6.1 程序的结构与流程图 结构化程序设计的基本控制结构有3种：即顺序结构、选择结构和循环结构。 在Visual Basic中要解决较复杂的问题，就要使用到分支结构、循环结构和跳转结构了。而程序也正是因为有了这些结构才使得计算机能顺利完成各种各样的任务。所有的这些结构方式都是通过相应的语句实现的，它们是： 条件结构 If语句； 选择结构 Select Case 语句； 循环结构 Do...Loop语句、For....Next语句和While...Wend语句； 跳转结构 GoTo语句和GoSub语句。 6.1 程序的结构与流程图 在研究算法时，人们习惯使用流程图来描述算法的结构。这种方法是用一些图框表示各类型的操作，用带箭头的线表示这些操作的执行顺序 6.2 选择控制结构 在许多情况下，人们希望程序语句执行的顺序依赖于输入数据或中间运算的结果。这时需要对某个变量或表达式的值进行判定，以决定执行哪些语句和跳过哪些语句不执行，我们称这种程序结构为选择结构（或分支结构）。 6.2.1 单行结构条件语句 1．单行形式的If……Then 用途：通过对条件的判断有选择的执行一条语句 语法： If 条件 Then 语句 条件：是供判断的关系表达式或逻辑表达式 语句：是条件成立的时候要执行的语句 6.2.1 单行结构条件语句 例6.2 ：找出用户输入的两个数的大数 Private Sub Command1_Click() Dim A As Integer, B As Integer Dim Max As Integer A = Int(InputBox(请输入第一个整数, 输入, 3)) B = Int(InputBox(第输入第二个整数, 输入, 6)) Max = A If Max B Then Max = B MsgBox Str(A) + 与 + Str(B) + 之中的大数为 + vbCrLf + Str(Max) End Sub 6.2.1 单行结构条件语句 2．单行形式的If……Then……Else 用途：根据条件是否成立从两条语句中选择一条执行 语法： If 条件 Then 语句1 Else 语句2 说明：Visual Basic在遇到 If……Then……Else语句时首先计算出条件的逻辑值若为True（即条件成立），则执行语句1若为False(即条件不成立)，则执行语句2 6.2.1 单行结构条件语句 例6.3：验证用户输入的整数的奇偶性 Private Sub cmd1_Click() Dim int1 As Integer, int2 As Integer int1 = CInt(txtInput.Text) int2 = int1 Mod 2 If int2 = 0 Then MsgBox 是一个偶数 _ Else MsgBox 是一个奇数 End Sub 6.2.2 块结构条件语句 1．多行形式的If……Then……End IF 用途：多行形式的If……Then……End IF可用来判断单一条件来执行一组语句 语法：If 条件 Then 语句组 End IF 说明：这是If……Then语句的多行形式，使用这种形式的选择结构，在条件成立时要执行的语句不再直接跟在Then后面，而是另外自成一个语句块，并且在最后一定要加上End IF。 6.2.2 块结构条件语句 例6.4：三数排序，构造如图的界面，用户在3个文本框中输入3个数，单击按钮完成从大到小的排序，把结构显示在第4个文本框中。 解析：这是一个简单的排序程序，也是排序算法中选择排序的雏形。通过两次判断，把最大的数放在第一位，再经过一次判断把第二大的数放在第二位，这样对于3个数，就完成了从大到小的排序。 6.2.2 块结构条件