PowerPoint 多媒体交互课件制作（VBA编程初步）

1.工程资源管理器。主要列出每一页幻片(如果该幻灯片存在控件的话，如:slide1,slide2,slide3...)、窗体、模块等对象信息。所有列出的信息都以“对象”来称呼。 2.对象编辑区。当点击“工程资源管理器”中的某一个“对象”时。在右窗口中打开该对象对其进行设计或代码编辑。

3.控件代码编辑窗口。当在幻灯片设置了某一个控件，双击控件时，即可打开相应控件的代码编辑窗口，在些处输入VBA程序代码。输入代码时，一般都是执行Click（）事件，如上面。

4.VBA编辑器的菜单。一般情况下，菜单的功能有很多，但如果用不到的话就可以不理它。

以上用得最多的是“控件代码编辑窗口”及“工程资源管理器”。

第三章 VBA语言及常用语句的应用 第三章 第一节 VBA语言基础知识

任何一种计算机编程语言都有它的各种规则。规定了“标识符、运算符、数据类型、变量与常量、数组、语句”等规则。VBA语言也一样。下面让我们在学习编程之前了解一下这些规则。

一、标识符

1．定义

标识符是一种标识变量、常量、过程、函数、类等语言构成单位的符号，利用它可以完成对变量、常量、过程、函数、类等的引用。 2．命名规则

1） 字母打头，由字母、数字和下划线组成，如 A987b_23Abc

2） 字符长度小于40，（Excel2002以上中文版等，可以用汉字且长度可达254个字符）

3） 不能与VB保留字重名，如public, private, dim, goto, next, with, integer, single等

二、运算符

1.定义：运算符是代表VB某种运算功能的符号。 1）赋值运算符 =

2）数学运算符 &、+ (字符连接符)、+(加)、-（减）、Mod（取余）、\\（整除）、*（乘）、/（除）、-（负号）、^（指数）

3）逻辑运算符Not（非）、And（与）、Or（或）、Xor（异或）、Eqv（相等）、Imp（隐含）

4）关系运算符 = （相同）、<>（不等）、>（大于）、<（小于）、>=（不小于）、<=（不大于）、Like、Is 5）位运算符 Not（逻辑非）、And（逻辑与）、Or（逻辑或）、Xor（逻辑异或）、Eqv（逻辑等）、Imp（隐含）

三、数据类型

VBA共有12种数据类型，具体见下表，此外用户还可以根据以下类型用Type自定

义数据类型。

数据类型 类型标识符 字节 字符串型 String $ 字符长度(0-65400) 字节型 Byte 无 1 布尔型 Boolean 无 2 整数型 Integer % 2 长整数型 Long & 4 单精度型 Single ! 4 双精度型 Double # 8 日期型 Date 无 8 公元100/1/1-9999/12/31 货币型 Currency @ 8 小数点型 Decimal 无 14 变体型 Variant 无 以上任意类型，可变 对象型 Object 无 4

在通常情况下，不是对数学运算很严格，在制作课件过程中只用到：字符型、整数型、小数点型。其它数据类型很少用到，除非制作数学课件例外。

第三章 第二节 VBA常用语句

要想制作的课件具有智能化、交互性强的特点，必须为课件编写一些有用的程序代码，例如，让学生做练习题、判断题等，学生做完练习必须让老师去判断是否对或错。那么在做课件时，如果能够在课件中加入一些自动分析的程序代码，帮助我们处理一些事情那不是更好吗？那我们的课件更让学生喜欢。

任何程序都是由4种结构的语句组成，VBA也不例外。这4种结构分别为：顺序结构、循环结构、分支结构和模块结构。下面我们主要介绍前面3种。

一、顺序结构

顺序结构的程序就是严格按程序编制的顺序执行的。即是从上而下一行一行执行。 （以下例子参见实例\常用程序语句的应用.rar\） 例1：显示顺序结构的执行

在幻灯片设置一个命令按钮（“顺序结构”），双击命令按钮，输入以下代码： Private Sub CommandButton1_Click()

Dim a, b, c As Integer '设置三个变量a,b,c a = 5 '给a赋值 b = 4 '给b赋值

c = 2 * a + 3 * b '定义C的表达式

MsgBox \计算C的值是:\& c '显示信息交互框窗口，并显示C的值 End Sub

顺序很简单，只要从上而下，一句一句编写，每个语句符合书写规则，语句都是根据程序设计目的而写的，这与个人的思维有关，你想出什么样的执行顺序，就会写出什么样的语句来，需要个人经验。程序一般也可以分为几部分： 第一部分：变量定义、变量赋初始值 第二部分：程序主要语句段

第三部分：程序结束部分，输出语句

二、 分支结构(条件语句）

在编写程序时，有时可能将对不同的条件进行判断，根据条件判断的结束来执行相应的程序。

1.语句格式一：(单条件判断) If 条件1 Then 表达式1

?这种格式只有一行，符合 条件1 则执行 表达式1 否则执行这个语句下面一行的其它程序。

例1：if x<10 then MsgBox \的值小于10\

2.语句格式二：（双条件判断） If 条件1 Then 表达式1 Else

表达式2 Eend if

?如果 条件1成立 则执行 表达式1 否则 执行 表达式2 例2：

If X < = 10 Then ?条件判断开始，如果X<10 则 MsgBox \的值在10范围\'输出对话框， Else '其它条件（即X>=10） MsgBox \的值超出10的范围\?输出对话框， End If ?条件判断结束 例3:

If A>B And C