第07单元 vba与宏.pptVIP

第7章 VBA编程 7.1 编程的基本概念 2. 对象 3. 属性和方法 4. 方法的例子 5. 事件 7.2 过程及模块分类 1. 过程的概念 2. 子程序 3. 子程序例 2. 标准工具条 7.3 VBA编程环境 1. VBA编程窗口 2. 标准工具条 3. 工程、属性、代码窗口 4. 在代码窗口中编程 7.4 变量、常量与数据类型 2. VBA主要数据类型 3. 数据类型的特殊情况 4. 变量声明的设置 5. 变量和常量的声明 6. 变量和常量的作用域 7. 数据类型转换 7.5 数组和自定义变量 2. 数据元素的下标与多维数组 3. 在数组中存储Variant值 4. 用户自定义数据类型 7.6 常用语句与程序结构 2. 语句的书写规定 3. 程序的三种基本结构 4. IF语句 5. Select Case语句 6. For Next 语句 7. Do…Loop 语句 7.7 VBA编程举例 2. 子程序的定义和调用 3. 打开、关闭窗口 4. 新建表、删除表 5. 用SQL和ADO编写查询程序 7.8 宏的创建与运行 2. 宏的分类 3. 宏窗口 4. 创建宏 5. 创建有条件的宏 6. 宏组的设计 成为事件过程 VBA程序可看成是由三种基本结构组成： ?顺序结构：其中的语句按排列的顺序依次执行。 ?条件判断结构：按照给定的条件进行判断，再按判断的结果分别执行程序中不同部分的代码。 ?循环结构：按照条件反复执行一系列语句。 根据循环的条件，可以把循环结构分为两类： ◆当型循环结构：当条件成立时，反复执行语句。 ◆直到型循环结构：反复执行语句直到条件成立为止。 语句组2 语句组1 T F 语句组2 条件 语句组2 F T 条件 语句组 T F 条件 语句组 If…Then…Else语句有三种形式： ?单行式：条件成立则执行一个语句。 格式：if 条件 then 语句 例：if pass(6)=“A” then MsgBox “Pass” 若有多个语句，应写在一行且用冒号隔开，例如， If A10 Then A=A+1:B=B+A:C=C+B ?带有else（否则）部分的形式：条件成立则执行一组语句，否则执行另一组语句 格式：If 条件 then 语句组1 Else 语句组2 End if 例： x=InputBox(“x=”) If x=0 then y=2*x+1 Else y=sin(x) Endif MsgBox “y:” y ?IF语句的嵌套：多重选择 格式： If 条件1 then 语句1 Elseif 条件2 then 语句2 …… Else 语句n End if 例：按所购买的商品数量 求折扣 数量=InputBox(“数量”) If 数量100 Then 折扣=0.9 ElseIf 数量200 Then 折扣=0.85 ElseIf 数量300 Then 折扣=0.8 ElseIf 数量400 Then 折扣=0.75 ElseIf 数量500 Then 折扣=0.7 Else 折扣=1 End If Select Case选择结构：根据表达式求值结果，选择执行几个分支中的一个。 格式： Select Case 检验表达式 [Case 比较列表1 ] [ 语句1] [Case 比较列表2 ] [ 语句1] …… [Case Else [语句n]] End Select 例：重编前例 数量=InputBox(“数量”) Select Case 数量 div 100 Case 0 折扣=1 Case 1 折扣=0.9 Case 2 折扣=0.85 Case 3 折扣=0.8 Case 4 折扣=0. 75 Case Else