第11章：VBA编程汇.pptVIP

第11章VBA编程 11.3 程序基本结构 （2）双路分支 格式一： If 表达式 Then 语句序列1 Else 语句序列2 End If 格式二： If 表达式 Then 语句1 Else 语句2 功能：先计算条件表达式的值，当条件表达式的值为True时，执行语句序列1/语句1中的语句；否则，执行语句序列2/语句2中的语句；执行完语句序列1/语句1或语句序列2/语句2后都将执行IF语句的下一条语句。 第11章VBA编程 11.3 程序基本结构 双路分支语句的流程图如下： 第11章VBA编程 11.3 程序基本结构 （3）多路分支 Select case语句又称多路分支语句，它是根据多个表达式列表的值，选择多个操作中的一个对应执行。 Select Case 测试表达式 Case 表达式值列表1 语句序列1 Case 表达式值列表2 语句序列2 …… …… Case 表达式值列表n 语句序列n [Case Else 语句序列n+1] End Select 第11章VBA编程 11.3 程序基本结构 功能：该语句执行时，根据测试表达式，从上到下依次检查n个表达式值列表，如果有一个与测试表达式的值相匹配，选择n+1个语句序列中对应的一个执行，当所有Case中的表达式值列表中没有与测试表达式的值相匹配时，如果有Case Else项，则执行语句序列n+1，再执行End Select后面的下一条语句；否则，直接执行End Select后面的下一条语句。 第11章VBA编程 11.3 程序基本结构 多路分支语句的流程图如下： 第11章VBA编程 11.3 程序基本结构 11.3.3 循环结构 1.For语句 For循环语句又称“计数”型循环控制语句，它以指定的次数重复执行一组语句。 For 循环变量＝初值 to 终值 [Step 步长] 循环体 [Exit For] Next 循环变量 功能：用循环计数器循环变量来控制循环体内的语句的执行次数。 第11章VBA编程 11.3 程序基本结构 For语句（当步长大于0时 ）的流程图如下： 第11章VBA编程 11.3 程序基本结构 For语句（步长小于0时 ）的流程图如下： 第11章VBA编程 11.3 程序基本结构 2.While语句 While语句又称“当”型循环控制语句，它是通过“循环条件”控制重复执行一组语句。 While 循环条件 循环体 Wend 功能：当循环条件为True时，执行循环体内的语句，遇到Wend语句后，再次返回，继续测试循环条件是否为True，直到循环条件为False，执行Wend语句的下一条语句。 第11章VBA编程 11.3 程序基本结构 While语句的流程图如下： 第11章VBA编程 11.3 程序基本结构 11.3.4 过程 1.定义Sub过程 [Public|Private][Static] Sub 子过程名 ([参数表]) 局部变量或常数定义 ＜语句序列＞ [Exit Sub] ＜语句序列＞ End Sub 功能：定义一个以子过程名为名的Sub过程，Sub过程名不返回值，而是通过形参与实参的传递得到结果，调用时可得到多个参数值。 第11章VBA编程 11.3 程序基本结构 2.创建Sub过程 Sub过程是一个通用过程，它不属于任何一个事件过程，因此它不能在事件过程中建立，通常Sub过程是在标准模块中，或在窗体模块中建立的。 操作步骤如下： （1）在窗体模块的通用部分利用定义Sub过程的语句建立Sub过程。 （2）在标准模块中，利用定义Sub过程的语句，建立Sub过程。 第11章VBA编程 11.3 程序基本结构 3.调用Sub过程 子过程名 [参数表] 或： Call 子过程名([参数表]) 功能：调用一个已定义的Sub过程。 第11章VBA编程 11.3 程序基本结构 11.3.5 自定义函数 1.定义Function过程 [Public|Private][Static]Function 函数名 ([参数表])[As类型] 局部变量或常数定义 语句序列 [Exit Function] 语句序列 函数名=返回值 End Function 功能：定义一个以函数名为名的Function过程，Function过程通过形参与实参的传递得到结果，返回一个函数值。 第11章VBA编程 11.3 程序基本结构 2.创建Function过程 同S