Visual Basic 6.0程序设计教程（第二版） 曾强聪 第3章 程序结构.pptVIP

第3章 程序结构 3.1 程序流程控制 3.2 基于模块建立程序 3.3 过程与函数 3.4 常用内置函数 3.5 面向对象编程 3.1 程序流程控制 3.1.1 分支结构 3.1.2 循环结构 3.1.3 嵌套控制结构 3.1.1 分支结构 分支结构的作用是使程序依照条件而走不同的支路。Visual Basic 支持的分支结构有： If...Then... If...Then...Else... Select Case 1．If...Then... 语句（如图3-1所示） 用 If...Then 结构可以有条件地执行其结构内的一条或多条语句。 当有条件地执行一条语句时，语法格式： If 条件表达式 Then 单条语句 当有条件地执行多条语句时，语法格式： If 条件表达式 Then 多条语句 End If If...Then... 2．If...Then...Else... 语句（如图3-2所示） 可以使用 If...Then...Else...语句建立多个分支流程，并根据条件选择其中一个分支。其语法结构是： If 条件1 Then [语句块1] [ElseIf 条件2 Then [语句块2]] ... [Else [语句块n]] End If 3．Select Case 语句（如图3-3所示） Select Case的语法结构是： Select Case 测试条件[Case 表达式1 [语句块1]][Case表达式2 [语句块2]]．．． [Case Else [语句块n]] End Select 3.1.2 循环结构 循环的作用是允许某个程序段被重复执行。Visual Basic 支持的循环结构有： Do…Loop For…Next For Each...Next 1．Do...Loop 循环 Do...Loop 语句是通过计算条件表达式以决定是否继续循环。其中，条件必须是一个值为 True（非零）或 False（零）的表达式。 形式一： Do While 条件表达式 +语句块 Loop 形式二： Do 语句块 Loop While 条件表达式 2．For...Next 循环 For 循环的语法如下： For 计数器 = 初始值 To 终止值 [Step 增量]语句块 Next [计数器] 其中，参数计数器、初始值、终止值和增量都必须是数值型的变量。 3．For Each...Next循环 语法格式是： For Each 元素 In 集合 语句块 Next 元素 4．中途退出循环 从Do...Loop中退出的语句是： Exit Do 从For循环中退出的语句是： Exit For 一般情况下，Exit Do或Exit For是嵌在分支语句中使用的。 3.1.3 嵌套控制结构 嵌套控制结构就是把控制结构放入另一个控制结构之内，例如在 For...Next 循环块中放入 If...Then... 块。在 Visual Basic 中，控制结构的嵌套层数没有限制。 3.2 基于模块建立程序 在Visual Basic中，基本模块是以文件形式体现的，有3种类型：标准模块、窗体模块和类模块，可以把它们看作为文件级模块。文件级模块中包含有：过程、函数、属性、方法、事件等内容，可以把它们看作为单元级模块。 （1）程序按功能执行步骤划分成诸多语句块。 （2）对于每个逻辑语句块应该给出必要注释，由此使程序更加便于理解。 （3）程序中的逻辑语句块的划分往往和程序的流程控制结构有关。 3.3 过程与函数 3.3.1 通用过程 3.3.2 函数过程 3.3.3 事件过程 3.3.4 调用其他模块中的公用子过程 3.3.5 过程编辑的可视化工具 3.3.6 向过程传递参数的方法及规则 3.3.1 通用过程 定义通用过程的语法是： [Private|Public][Static] Sub 过程名 (形式参数列表) 语句块 End Sub 调用通用过程的语法是： Call 过程名(实际参数列表) 或： 过程名 实际参数列表 3.3.2 函数过程 函数过程的语法是： Private|Public][Static]Function 函数名 (形式参数列表) [As 类型] 语句块 End Function 调用函数过程的基本语法是： 变量 = 函数名(实际参数列表) 3.3.3 事件过程 事件过程可以在“代码编辑器”窗口中创建。通过从“代码编辑器”的“对象框”中选择一个对象，从“过程框”中选择一个过程，可以获得一个事件