VBA编程_.ppt

定义函数时用Public关键字，则所有模块都可以调用它。用Private关键字，函数只用于同一模块。如果没有显式指定，则缺省为公用。 函数名末尾可使用As子句来声明返回值的数据类型，参数也可指定数据类型。若省略数据类型说明，系统会自动根据赋值确定。 Exit Function 语句的作用是退出Function 过程。 4.5 流程控制语句 4.5.1 If语句 4.5.2 GoTo语句 4.5.3 Select Case语句 4.5.4 For...Next语句 ?4.5.5 Do...Loop语句 4.5.6 With语句  4.5.1 If语句 If语句是我们最常用的一种分支语句。它符合人们通常的语言习惯和思维习惯。If语句有三种语法形式。 ① if 条件 then 语句1 [else 语句2] ② if 条件 then 语句组1 [else 语句组2] end if ③ if 条件1 then 语句组1 [elseif 条件2 then 语句组2… else 语句组n] end if 条件是一个关系表达式或逻辑表达式。若值为真，则执行紧接在关键字then后面的语句组。若条件的值为假，则检测下一个elseif条件或执行else关键字后面的语句组，然后继续执行下一个语句。 ?  4.5.2 GoTo语句 ? 用GoTo语句可以无条件地转到另一条语句去执行。语法格式： GoTo 标号或行号 标号以字母开头，冒号结束，不超过40个字符。行号是一个数值。 GoTo语句会影响程序的结构，使程序阅读及调试困难。因此，除非万不得已，尽量少使用GoTo语句。  4.5.3 Select Case语句 如果条件复杂，程序需要多个分支，用If语句就会显得相当累赘，而且程序变得不易阅读。这时我们可以使用Select Case 语句来写出结构清晰的程序。 Select Case语法如下： Select Case 检验表达式 [Case 比较列表1 [语句组1]] … [Case Else [语句组n]] End Select 其中的检验表达式是任何数值或字符串表达式。 比较元素可以是下列几种形式之一： ①表达式 ②表达式 To 表达式 ③Is 比较操作符 表达式 说明： 如果检验表达式与Case子句中的一个比较元素相匹配，则执行该子句后面的语句组。 比较元素若中含有To关键字，则第一个表达式必须小于第二个表达式，检验表达式值介于两个表达式之间为匹配。 比较元素若含有Is关键字，Is代表检验表达式构成的关系表达式的值为真则匹配。  4.5.4 For...Next语句 ? For...Next是一个循环语句，其语法形式如下： ? For 循环变量=初值To 终值 [Step 步长] [语句组] [Exit For 语句组] Next [循环变量] ? 该循环语句执行时，首先把循环变量的值设为初值，如果循环变量的值没有超过终值，则执行循环体，遇到Next，把步长加到循环变量上，若没有超过终值，再循环，直至循环变量的值超过终止时，才结束循环，继续执行后面的语句。 步长可正、可负，为1时可以省略。遇到Exit For时，退出循环。 ?  4.5.5 Do...Loop语句 ?Do...Loop语句可以循环执行语句组，它有以下两种形式： ① Do[{While|Until}条件] [过程语句] [Exit Do] [过程语句] Loop ② Do [过程语句] [Exit Do] [过程语句] Loop [{While|Until}条件] 上面格式中，While和Until的作用正好相反。使用While，则当条件为真继续循环。使用Until，则当条件为真时，结束循环。 把While或Until放在Do子句中，则先判断后执行。把一个While或Until放在Loop子句中，则先执行后判断。  4.5.6 With语句 在引用对象的时候，用With可以简化代码中对复杂对象的引用。可以用With语句建立一个“基本”对象，然后进一步引用这个对象上的对象、属性或方法，直至终止With语句。其语法形式如下： ? With对象引用 [语句组] End With  4.6.1 尽量使用系统提供的属性、方法和函数 ? 4.6.2 尽量减少使用对象引用 4.6.3 减少对象的激活和选择 ?4.6.4 关闭屏幕更新 4.6.5 变量和常量的使用 ? 4.6 VBA应用程序的优化  4.6.1 尽量使用系统提供的属性、方法和函数 ? 系统对象有上百个，对象的属性、方法、事件更是多不胜数，对于初学者来说可能对它们不全部