首页 ppt_VBA编程初步

ppt_VBA编程初步

举报
开通vip

ppt_VBA编程初步 第一章 PPT的基本交互技术 利用 Powerpoint应用程序制作课件已经不是什么新鲜事物,在广大教师队伍中应该 来说 100%的教师都用过,甚至经常制作课件用来上课,对文字、图片、视频等媒体的 插入、编排,以及幻灯片的基本操作一般都熟悉。因此,从本节起,不谈及基本的操作 步骤,现主要从如何能够体现课件的“交互性”入手,谈谈与课件“交互性”有关的一些操 作(以 PowerPoint 2003版本为例)。 一、PowerPoint 2003应用程序体现“交互性”功能简介...

ppt_VBA编程初步
第一章 ppt 关于艾滋病ppt课件精益管理ppt下载地图下载ppt可编辑假如ppt教学课件下载triz基础知识ppt 的基本交互技术 利用 Powerpoint应用程序制作课件已经不是什么新鲜事物,在广大教师队伍中应该 来说 100%的教师都用过,甚至经常制作课件用来上课,对文字、图片、视频等媒体的 插入、编排,以及幻灯片的基本操作一般都熟悉。因此,从本节起,不谈及基本的操作 步骤,现主要从如何能够体现课件的“交互性”入手,谈谈与课件“交互性”有关的一些操 作(以 PowerPoint 2003版本为例)。 一、PowerPoint 2003应用程序体现“交互性”功能简介 PowerPoint是 Office办公套件中的演示文稿程序。其基本功能可以归纳为: (1)它可以看作是一个媒体集成平台,能够集成文本、图形、图片、 关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf 格、声音、视 频、动画等多种媒体元素,并有多种演播方式; (2)它提供翻页动画和对象动画,使得页面和其中的元素能够“动”起来,产生良好的 视觉效果; (3)它提供现成的设计模板,几分钟就能让你创建一个清楚简洁美观的演示文稿。 如何体现出具有交互性能的课件,下面主要对母版、触发器、动作路径的运用作一个 简要的说明,对制作交互式课件很有作用 。 1. 幻灯片母版 在同一演示文稿中我们可以应用多个不同的设计模板,使我们的演示文稿界面风格 统一、美观又有所变化。 而现在所说的“幻灯片母版”, 与设计模板有所不同,如果想 在整个课件每一页都统一显示某个“按钮”或“图片”等信息,则需要在“幻灯片母版”上进 行设置。PowerPoint 2003版进入 幻灯片母版后,可以对母版进行编辑。幻灯片母版 通常 设计一些对整个课件中每一个幻灯片都需要的文字信息、命令按钮、幻灯片背景 图片、背景颜色等。 2. 触发器的设置 触发器同样是 2003及以上版本的一个新增功能。它存在于对象自定义动画的“计时” 选项中,在放映视图中,只有当鼠标单击触发对象时,才开始播放该对象。在播放幻灯 片时,通过“点击鼠标”来呈现对象的方法不能很好地控制“对象”出现的顺序,所以我们 可以用“触发器”这个功能开发某个对象的呈现过程,比通常通过“点击鼠标”来呈现对象 的方法好。利用“触发器”可以制作交互性强的幻灯片,如制作:选择 快递公司问题件快递公司问题件货款处理关于圆的周长面积重点题型关于解方程组的题及答案关于南海问题 、判断题,弹出 式菜单等。 3. 路径动画 对象动画除了分为进入、强调、退出等三种传统自定义动画方式外,在 PowerPoint 2003版中还新增了“路径动画”。动作路径是一种不可见的轨迹,我们可以将幻灯片上的 图片、文本行或形状等项目放在动作路径上,使它们沿着动作路径运动。例如,我们可 以使用系统提供的各种预设路径(如弹簧形、心跳形),或我们自己手绘路径,将文本 或图形对象从幻灯片上的一个位置移动到另一个位置;我们还可以对路径进行编辑和修 改,以符合我们的需要。 第二章 认识控件对象及编程环境 第二章 第一节 VBA基础知识 一、什么是 VBA? 直到上世纪 90年代早期,使应用程序自动化还是充满挑战性的领域。对每个需要自 动化的应用程序,人们不得不学习一种不同的自动化语言。例如:可以用 EXCEL的宏 语言来使 EXCEL自动化,使用WORD BASIC使WORD自动化,等等。微软决定让它 开发出来的应用程序共享一种通用的自动化语言--------Visual Basic For Application(V BA),可以认为 VBA是非常流行的应用程序开发语言 VASUAL BASIC 的子集。实际上 V BA是"寄生于"VB应用程序的版本,VBA和 VB的区别包括如下几个方面: 1. VB是设计用于创建标准的应用程序,而VBA是使已有的应用程序(EXCEL等)自动 化。 2. VB具有自己的开发环境,而 VBA必须寄生于已有的应用程序。 3. 要运行 VB开发的应用程序,用户不必安装 VB,因为 VB开发出的应用程序是可 执行文件(*.EXE),而 VBA开发的程序必须依赖于它的“父”应用程序。 尽管存在这些不同,VBA和 VB在结构上仍然十分相似。事实上,如果你已经了解了 VB,会发现学习 VBA非常快。相应的,学完 VBA会给学习 VB打下坚实的基础。 VBA究竟是什么?更确切地讲,VBA是微软在其开发的应用程序中共享的通用自动化 语言。它既然是一种自动化语言,它可以使常用的 应用实现自动化,可以创建自定义的解 决方案。 VBA是 Visual Basic for Application的简写,它以 VB语言为基础,经过修改并运行 在 Microsoft Office的应用程序,它是不能像 VB一样能生成可执行程序的。 VBA是 Microsoft Office系列软件的内置编程语言,是应用程序开发语言 VB(Visu al Basic)的子集。它功能强大,面向对象,可极大地增加 Office系列软件的交互性。 第二章 第二节 认识控件对象 我们经常看到高手做的多媒体课件中都有许多的按钮、文本框、选项框等之类的工 具,使用这些工具会令课件更具有可操作性、交互性等特点。在 Powerpoint做课件时, 同样提供了一组这样的工具,那叫 ActiveX控件。所谓 ActiveX控件就是一种图形对象, 可以使用它在 Powerpoint演示文稿中控制一组预定义的事件(或执行一段程序代码)。 在进行学习 VBA编程之前,必须理解这些控件的作用及使用方法。 一、powerpoint控件 显示控件工具箱:在 Powerpoint中选择菜单“视图-工具栏-控件工具箱”,则“控件 工具箱”就会出现在 powerpoint工作区内。 如下图: 在制作课件过程中,我们会经常用到的有下面几种控件: 标签(Label):用于表现静态文字信息,如显示选择题、判断题的题目等; 复选框(CheckBox):是一个选择控件,可用于多项选择题的制作; 文本框(TextBox):可以输入文本,用来制作填空题; 命令按钮(CommandButton):可用于制作幻灯片上的按钮,还可通过按钮来改 变幻灯片的播放顺序,设计超级链接; 选项按钮(OptionButton):通常一组使用,只能选中其中一个,用来制作单项选 择题或判断题。 这是控件的属性,当设置完一个控件后,点击该按钮,就显示该控件的属性窗 口。 查看代码,当鼠标选中某一个控件时再点击该按钮,即可查看该控件的代码窗口, 或在代 码窗口中输入一段程序代码。 还有其它控件,我们在以后学习到需要时再一一讲解吧。 列表框(ListBox) 组合框(ComboBox) 开关按钮(ToggleButton) 数字调节(SpinButton) 滚动条(ScrollBar) 图像(Image) 除了上面几个常用控件外,Windows系统还有许多控件没有列出,在“控件工具箱” 最右边那个按钮 叫“其它控件”。点击这个按钮,系统就会出现下拉列表,弹出更多 的控件让你选择。这些控件很多都没有用到,暂时不谈了。 控件是如何为我们服务的呢? 上一节介绍了控件的基本属性,当设置了控件的属性,该控件本身就确定了个性与 特点,但如果不给它做任何东西,这个控件就好象形同摆设,例如,在幻灯片上设置一 个“命令按钮”,不管你设置了它的颜色、字体、大小等属性,在幻灯片播放时任你如何 用鼠标点击它,它都是没有任何动作,不给你干活。要想让控件我们干活,那就得给它 干活的东西----那就是给控件设置一段程序代码。你给它编写什么样的代码,它就给你 干什么样的活。那么,那些代码要放在哪里呢? 一、控件的事件与方法 1.事件 提示:在还没有学习下面内容之前,请先点击右面的视频录像,看一看什么是事件。 在上面这个录像中,播放幻灯片时,当点击了“命令按钮”,屏幕就会执行这个按钮的 Click事件,并显示一个对话框,如下图: 为什么点击这个“命令按钮”就会显示这个对话框呢?因为我在 Click事件代码中输入 了一行语句,如下(黑色的部分是输入的内容),这个 Msgbox语句就是产生一个对话 框的效果,而这个语句要能够显示在屏幕上,必须把这个语句代码写入 Click事件: Private Sub CommandButton1_Click() MsgBox "你点击了命令按钮,执行了 CLICK事件,谢谢你啊!" End Sub 什么是“事件”?一个事件就是用户在控件对象上所做的一个动作。当系统响应用户的 某些动作时,会自动触发事件代码。例如,用户在控件对象上做出单击动作时,系统自 动执行为 Click事件编写的程序代码。 当在幻灯片中设置了一个控件,如“命令按钮”,再用鼠标双击该控件,就会自动进 入到 VBA代码编辑器,控件默认的事件一般都为控件的 Click()事件 ,Click(点击的 意思),我们可以通过代码窗口上面的两个下拉列表选择要编程的对象和该对象的响应 事件。如下图: 只有通过输入 Click事件的代码程序,这些控件才能发挥其强大功能,如果没有给这 些控件输入 Click事件代码,这个控件只是一个摆设,没有什么作用了。 控件常用的事件 2.方法 提示:在还没有学习下面内容之前,请先点击右面的视频录像,看一看什么是方法。 在上面这个录像中,播放幻灯片时,当点击了“显示窗体”按钮,屏幕就会出现一个窗 体。也就是点击按钮时执行这个按钮的Click事件,在这个事件代码中输入了一句代码(黑 色字体是输入代码): Private Sub CommandButton2_Click() UserForm1.Show End Sub 什么是方法?方法,就是控件对象进行的操作。例如:某对象的显示(Show)方法、 隐藏(Hide)方法、清除内容(Clear)方法 、复制(Copy)方法,等。上面的例子就是把 用户窗体(Userform1)执行“显示(Show)”操作。 “方法”与“事件”有相似之处,都是为了完成某个任务,但同一个事件可完成不同任务, 取决于您所编的代码是怎样的,而方法则是固定的,任何时候调用都是完成同一个任务, 所以其中的代码也不需要我们编了,系统已为我们编好(我们也看不见),只需在必要 的时候调用即可。 方法的调用:控件名称.方法 在方法调用格式中,“控件名称”与“方法”之间必须使用“.”隔开。如:UserForm1.Sho w 在 VBA编程中,控件的方法很少,应用时也用得很少 ,一般在用户窗体的应用中会 出现调用窗体的方法比较多。以后在例子中应用到时再分析。 下面通过实例说明常用控件事件的使用。 第二章 第四节 PPT应用程序对象及其应用 一、Powerpoint应用程序对象介绍 在录制宏过程中,或者以后的 VBA编程中,经常会用到 Powerpoint应用程序的对象。 这些对象是 Office在 应用程序中提供给用户访问或进行二次开发使用。哪些对象是什 么?又有什么用呢?下面列出一些常用的应用程序对象。其中 DocumentWindow对象、 SlideShowWindow对象、Slide对象 、Shape对象在课件制作过程中会经常用到。 1.Application对象 该对象代表 PowerPoint应用程序,通过该对象可访问 PowerPoint中的其他所有对 象。 (1)Active属性:返回指定窗格是否被激活。 (2)ActivePresentation属性:返回 Presentation对象,代表活动窗口中打开的演示 文稿。 (3)ActiveWindow属性:返回 DocumentWindow对象,代表当前文档窗口。 (4)Presentations属性:返回 Presentations集合,代表所有打开的演示文稿。 (5)SlideShowWindows属性:返回 SlideShowWindows集合,代表所有打开的幻灯 片放映窗口。 (6)Quit方法:用于退出 PowerPoint程序。 2.DocumentWindow对象 该对象代表文档窗口。使用“Windows(index) ”语法可返回DocumentWindow对象。 (1)ActivePane属性:返回 Pane对象,代表文档窗口中的活动窗格。 (2)Panes属性:返回 Panes集合,代表文档窗口中的所有窗格。 (3)ViewType属性:返回指定的文档窗口内的视图类型。 3.Presentation对象 该对象代表演示文稿,通过“Presentations(index)”语法可返回 Presentation对象。 (1)BuiltInDocumentProperties属性:返回 DocumentProperties集合,代表演示文 稿的所有文档属性。 (2)ColorSchemes属性:返回 ColorSchemes 集合,代表演示文稿的配色方案。 (3)PageSetup属性:返回 PageSetup对象,用于控制演示文稿的幻灯片页面设置 属性。 (4)SlideMaster属性:返回幻灯片母版对象。 (5)SlideShowSettings属性:返回 SlideShowSettings对象,代表演示文稿的幻灯片 放映设置。 (6)SlideShowWindow属性:返回幻灯片放映窗口对象。 (7)AddTitleMaster方法:为演示文稿添加标题母版。 (8)ApplyTemplate方法:对演示文稿应用设计模板。 4.SlideShowWindow对象 该对象代表幻灯片放映窗口。 IsFullScreen属性:用于设置是否全屏显示幻灯片放映窗口。 5.Master对象 该对象代表幻灯片母版、标题母版、讲义母版或备注母版。 TextStyles属性:为幻灯片母版返回 TextStyles 集合,代表标题文本、正文文本和 默认文本。 6.Slide对象 该对象代表幻灯片。 (1)SlideID属性:返回幻灯片的唯一标识符。 (2)SlideIndex属性:返回幻灯片在 Slides集合中的索引号。 7.SlideShowView对象 该对象代表幻灯片放映窗口中的视图。 (1)AcceleratorsEnabled属性:用于设置是否允许在幻灯片放映时使用快捷键。 (2)CurrentShowPosition属性:返回当前幻灯片在放映中的位置。 (3)DrawLine方法:在指定幻灯片放映视图中绘制直线。 (4)EraseDrawing方法:用于清除通过 DrawLine方法或绘图笔工具在放映中绘制的 直线。 (5)GotoSlide方法:用于切换指定幻灯片。 8.Shape 对象 该对象代表绘图层中的对象,例如自选图形、任意多边形、OLE 对象或图片。 注意:共有三个代表形状的对象:Shapes 集合,代表文档中的所有形状;ShapeRa nge 集合,代表文档中指定的部分形状(例如,ShapeRange 对象可以代表文档中的第 一个和第四个形状,或代表文档中所有选定的形状);Shape 对象,代表文档中的单个 形状。如果要同时使用多个形状或集合中的形状,请使用 ShapeRange 集合。 以上 Powerpoint应用程序对象 ,如果不需要进行深入的二次开发,大多数对象很 少用到,在本课程中,比较常用的对象只有 DocumentWindow对象、SlideShowWindo w对象、Slide对象 、Shape 对象。在后面的 VBA编程中,我们在应用的时候将会介 绍,一般都是写入编程代码中 。 第二章 第五节 VBA编辑器的使用与操作 在 powerpoint界面中进行 VBA编程有两种方式:录制宏和在 Visual Basic编辑器中 直接编程。录制宏是将一系列操作过程录下来并由系统自动转换为 VBA语句,并保存 为一个宏文件。如果操作者需要再次执行与录制的宏完全相同的一系列操作,只需运行 刚刚录制完成的宏即可,大大地缩短了操作时间,并可以实现日常工作的自动化。如果 要在 powerpoint中制作出具有较好交互功能的课件,必须采用第二种方式,即直接在 V isual Basic编辑器中进行编程。 一、启动 VBA编辑器 当我们双击 Powerpoint幻灯片中任一控件时,随即打开 VBA编辑器(或者点击菜单: 工具->宏->Visual Basic编辑器)如下图。VBA编辑器分为:菜单区、工程资源管理区、 对象编辑区。 1.工程资源管理器。主要列出每一页幻片(如果该幻灯片存在控件的话,如:slide1,sli de2,slide3...)、窗体、模块等对象信息。所有列出的信息都以“对象”来称呼。 2.对象编辑区。当点击“工程资源管理器”中的某一个“对象”时。在右窗口中打开该对 象对其进行设计或代码编辑。 3.控件代码编辑窗口。当在幻灯片设置了某一个控件,双击控件时,即可打开相应 控件的代码编辑窗口,在些处输入 VBA程序代码。输入代码时,一般都是执行 Click() 事件,如上面。 4.VBA编辑器的菜单。一般情况下,菜单的功能有很多,但如果用不到的话就可以 不理它。 以上用得最多的是“控件代码编辑窗口”及“工程资源管理器”。 第三章 VBA语言及常用语句的应用 第三章 第一节 VBA语言基础知识 任何一种计算机编程语言都有它的各种 规则 编码规则下载淘宝规则下载天猫规则下载麻将竞赛规则pdf麻将竞赛规则pdf 。规定了“标识符、运算符、数据类 型、变量与常量、数组、语句”等规则。VBA语言也一样。下面让我们在学习编程 之前了解一下这些规则。 一、标识符 1.定义 标识符是一种标识变量、常量、过程、函数、类等语言构成单位的符号,利用 它可以完成对变量、常量、过程、函数、类等的引用。 2.命名规则 1) 字母打头,由字母、数字和下划线组成,如 A987b_23Abc 2) 字符长度小于 40,(Excel2002以上中文版等,可以用汉字且长度可达 25 4个字符) 3) 不能与 VB保留字重名,如 public, private, dim, goto, next, with, intege r, 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种。 一、顺序结构 顺序结构的程序就是严格按程序编制的顺序执行的。即是从上而下一行一行执行。 (以下例子参见实例"3_2常用程序语句的应用.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 "X的值小于 10" 2.语句格式二:(双条件判断) If 条件 1 Then 表达式 1 Else 表达式 2 Eend if ’如果 条件 1成立 则执行 表达式 1 否则 执行 表达式 2 例 2: If X < = 10 Then ’条件判断开始,如果 X<10 则 MsgBox "X的值在 10范围" '输出对话框, Else '其它条件(即 X>=10) MsgBox "X的值超出 10的范围" ’输出对话框, End If ’条件判断结束 例 3: If A>B And CB And C= 90 Then '以下是判断语句,如果 score >= 90 MsgBox ("该生成绩评为:优秀") '则显示“优秀”对话框 ElseIf score >= 80 Then '如果 score >= 80 MsgBox ("该生成绩评为:良好") '则显示“良好”对话框 ElseIf score >= 60 Then '如果 score >= 60 MsgBox ("该生成绩评为:及格") '则显示“及格”对话框 Else '其它条件 MsgBox ("该生成绩评为:不及格") '则显示“不及格”对话框 End If '判断结束 End Sub 4. Select Case ...End Select 语句 格式: Select Case 变量 Case 值 1 语句段 1 Case 值 2 语句段 2 . . . Case Else 语句段 n End Select 这个结构语句,是对“变量”分别判断其值,当为“值 1”时,即执行“语句段 1”;当为“值 2”时,即执行“语句段 2”;当所有的值都不符合时,则执行“语句段 n”,需要判断多少个 值,就编写多少个 Case 。 第三章 第三节 过程与函数 过程是构成程序的一个模块。简单地说,过程就是为完成一定任务而编的一段程序, 用来完成一个相对独立的功能。过程可以使程序更清晰、更具结构性。VBA具有四种过 程:Sub 过程、Function函数、Property属性过程和 Event事件过程。 在做课件过程 中,一般情况下,我们可能用到的是 Sub过程及 Function函数。 一.Sub过程 Sub过程又称子过程。 语句结构: Sub 过程名() ... End Sub 下面举例一个简单的过程,完成一个基本的功能。 实例 3_5a:利用输入、输出函数,输入你的姓名,然后再输出你的名字信息。 Sub yourname() '过程名称是 yourname,过程开始 Dim name1 As String '定义一个变量 name1 name1 = InputBox("请输入你的姓名:") '显示输入对话框,当用户输入姓名后 的值赋给变量 name1 MsgBox "你的姓名是:" & name1 '再用输出对话框,输出你的姓名 End Sub '过程结束 程序代码见文件:3-5过程函数调用.rar 。播放课件看看效果如何。 过程的执行(调用)过程:打开文件可以见到,在 VBA代码中,有一个过程 Sub y ourname() ,那如何调用(执行)它的功能呢?在课件中还须设置一个控件“按钮”,这 个控件代码(Call yourname),就是调用了这个过程的。所以,在课件播放时,点击“按 钮”就可以调用这个过程了。 Sub 过程可以带参数。在过程名后面的()里加上参数。在后面通过实例说明如何 使用吧。 实例 3-5b:求 n个数的求和及阶乘。程序运行时,要求输入一个最大的整数,然后分 别计算 1至 n的和及阶乘,把结果输出信息框(见下面介绍)。 二.Function函数 VBA中包含很多内部函数,例如常用的数学函数(下面会讲解)。这里指的 Functi on函数实际上是 用户自己定义的一段代码,来完成特定的运算并返回结果。参数传递 也两种:按值传递(ByVal)和按地址传递(ByRef)。 语句结构: function 函数名(参数 As 参数类型) ...... End Function 例子:建立一个函数用于计算阶乘,参数和返回值都是 Double值。 Function factorial(num As Double) As Double '建立阶乘函数,函数名是 factorial Dim i As Double '定义变量 Dim temp As Double '定义变量 temp = 1 For i = 1 To num '循环开始 temp = i * temp '每循环一次,将数与乘积相乘,temp=1*2*3*...*num Next i '循环结束 factorial = temp '将循环阶乘结束的值赋给 factorial End Function '函数结束 第三章 第四节 VBA内置函数 VBA应用程序中可以使用以下几种内置函数:数学函数、字符串函数、日期和时间函 数、类型转换函数、逻辑测试函数和输入输出函数。使用这些函数可以充分发挥 VBA 语言功能,可以帮助程序代码设计和减少代码的编写工作,在实际应用中起到事半功倍 的效果。尤其在制作数学课件过程中,运用数学函数会令课件增强科学函数计算机功能。 一.测试函数 IsNumeric(x) ‘是否为数字, 返回 Boolean结果,True or False IsDate(x) ‘是否是日期, 返回 Boolean结果,True or False IsEmpty(x) ‘是否为 Empty, 返回 Boolean结果,True or False IsArray(x) ‘指出变量是否为一个数组。 IsError(expression) ‘指出表达式是否为一个错误值 IsNull(expression) ‘指出表达式是否不包含任何有效数据 (Null)。 IsObject(identifier) ‘指出标识符是否表示对象变量 二.数学函数 Sin(X)、Cos(X)、Tan(X)、Atan(x) 三角函数,单位为弧度 Log(x) 返回 x的自然对数 Exp(x)返回 ex Abs(x) 返回绝对值 Int(number)、Fix(number) 都返回参数的整数部分,区别:Int 将 -8.4 转换成 -9, 而 Fix 将-8.4 转换成 -8 Sgn(number) 返回一个 Variant (Integer),指出参数的正负号 Sqr(number) 返回一个 Double,指定参数的平方根 VarType(varname) 返回一个 Integer,指出变量的子类型 Rnd(x)返回 0-1之间的单精度数据,x为随机种子 三.字符串函数 Trim(string) 去掉 string左右两端空白 Ltrim(string) 去掉 string左端空白 Rtrim(string) 去掉 string右端空白 Len(string) 计算 string长度 Left(string, x) 取 string左段 x个字符组成的字符串 Right(string, x) 取 string右段 x个字符组成的字符串 Mid(string, start,x) 取 string从 start位开始的 x个字符组成的字符串 Ucase(string) 转换为大写 Lcase(string) 转换为小写 Space(x) 返回 x个空白的字符串 Asc(string) 返回一个 integer,代表字符串中首字母的字符代码 Chr(charcode) 返回 string,其中包含有与指定的字符代码相关的字符 四.转换函数 CBool(expression) 转换为 Boolean型 CByte(expression) 转换为 Byte型 CCur(expression) 转换为 Currency型 CDate(expression) 转换为 Date型 CDbl(expression) 转换为 Double型 CDec(expression) 转换为 Decemal型 CInt(expression) 转换为 Integer型 CLng(expression) 转换为 Long型 CSng(expression) 转换为 Single型 CStr(expression) 转换为 String型 CVar(expression) 转换为 Variant型 Val(string) 转换为数据型 Str(number) 转换为 String 五.时间函数 Now 返回一个 Variant (Date),根据计算机系统设置的日期和时间来指定日期和时 间。 Date 返回包含系统日期的 Variant (Date)。 Time 返回一个指明当前系统时间的 Variant (Date)。 Timer 返回一个 Single,代表从午夜开始到现在经过的秒数。 TimeSerial(hour, minute, second) 返回一个 Variant (Date),包含具有具体时、分、 秒的时间。 DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) 返回 Varian t (Long) 的值,表示两个指定日期间的时间间隔数目 Second(time) 返回一个 Variant (Integer),其值为 0 到 59 之间的整数,表示一 分钟之中的某个秒 Minute(time) 返回一个 Variant (Integer),其值为 0 到 59 之间的整数,表示一 小时中的某分钟 Hour(time) 返回一个 Variant (Integer),其值为 0 到 23 之间的整数,表示一天 之中的某一钟点 Day(date) 返回一个 Variant (Integer),其值为 1 到 31 之间的整数,表示一个月 中的某一日 Month(date) 返回一个 Variant (Integer),其值为 1 到 12 之间的整数,表示一年 中的某月 Year(date) 返回 Variant (Integer),包含表示年份的整数。 Weekday(date, [firstdayofweek]) 返回一个 Variant (Integer),包含一个整数,代 表某个日期是星期几 。 六、输入输出函数 在 VBA中,有一类重要函数就是输入输出函数,通过它们用户可以编制具有交互性 强的程序。它们分别是:MsgBox函数、Input函数。(具体介绍见下页) 第三章 第五节 调用 VBA程序 编写了一段 VBA程序之后,该如何让它们执行呢?其实通过前面的例子大家都 应该知道,在编写 VBA代码时,有几种方法: 1.一种是通过控件调用。在 Powerpoint幻灯片中设置了一个“控件”(如“命令按 钮”控件),双击该控件就可以打开 VBA代码编辑窗口 ,在控件的 Click事件中编 写程序代码。代码编写完毕,并保存。以后在放影课件时,点击该幻灯片的“控件” 就直接调用了里面的 VBA程序代码了。这是比较常的方法。 2.另一种 VBA程序是写在子过程代码中。这种 VBA程序是完成一个特定的功能。 然后再调用子过程。(3.3节 过程与函数) 第四章 PPT多媒体交互课件实例 第四章 第一节 制作课件导航菜单 一个成功的课件,PPT课件也不例外,必须有课件的导航菜单。课件菜单的表现形 式有多种,以 PPT课件为例, 在前面章节学习过程中已经举例,现总结归纳如下: 1.通过首页的“超级链接”设置导航菜单。 一般在课件首页,设置“超级链接”菜单。设置的可以是文字超级链接,也可以是图片 超级链接。当设置好超级链接后,每一小节最后一页幻灯片必须有一个“返回”铵扭。 这样,达到课件的“模块操作”效果。 2.通过“幻灯片母版”设置导航菜单。 点击“视图->母版->幻灯片母版”进入母版编辑页,如果不喜欢原来默认的样式,则需 把所有的样式都删去,保留一个空白母版。在母版上可以设置背景、页面边框、动作按 钮及菜单等功能。 例如:在母版中设置如下菜单按钮,做好超级链接的跳转页面,保存后,则在每一 页幻灯片都会显示这个菜单,上课时,不管在课件什么位置,教师都可以点击这个菜单 来达到跳转效果,达到“模块操作”效果,而不会因为不知道跳转页面搞得手忙脚乱。 3.通过“触发器”设置导航菜单。 利用触发器制作交互课件菜单。利用“动作按钮”来控制课件中“目录菜单”的出现,需 要时点击“按钮”,“目录菜单”即出现,不需要时再点击“按钮”,“目录菜单”即消失。制作 要求在“母版幻灯片”中进行,因为“目录菜单”需要在每一个幻灯片页面中根据教学的需 要随时调出使用,所以必须在“幻灯片母版”中制作。制作过程见实例 1.4-6及录像 1.4- 6。 播放时,只有一个按钮显示在窗口中,当鼠标点击按钮时,从按钮中弹出一个菜单, 再点击一下按钮,菜单收回。这个过程要配合菜单的出现方式和退出方式实现,其中的 菜单项设置了超级链接。 以上几种操作方法在前面已经讲述,操作过程比较容易,这时不再举例。 注意前期完成的工作:假设课件总共有 14个页(幻灯片)。如上图,为了能够达到 在课件中设置菜单后的效果,对课件应做如下处理: 1.前期完成所有幻灯片的页编辑。 3.将所有幻灯片放映切换模式由原来的“点击鼠标切换”变为不切换模式。 第四章 第二节 制作视频播放器 为了能更好地帮助大家合理地在 PowerPoint课件中插入和播放视频文件,下面介绍 PowerPoint中插入和处理视频的几种方法: 一、直接插入视频文件 这种播放方法是将事先准备好的视频文件作为电影文件直接插入到幻灯片中,该方 法是最简单、最直观的一种方法,使用这种方法将视频文件插入到幻灯片中后,Power Point只提供简单的[暂停]和[继续播放]控制,而没有其他更多的操作按钮供选择。因此 这种方法特别适合 PowerPoint初学者,以下是具体的操作步骤: 1. 运行 PowerPoint程序,打开 PPT课件或新建一张幻灯片。 2. 将鼠标移动到菜单栏中,依次单击“插入”-->“影片和声音”-->“文件中的影片”命 令。 3. 在随后弹出的文件选择对话框中,将事先准备好的视频文件选中,并单击[添加] 按钮,这样就能将视频文件插入到幻灯片中了。 系统还要问你:你希望影片是自动播 放还是单击鼠标播放? 一般是“单击鼠标”进行播放视频。 4. 用鼠标选中视频文件,并将它移动到合适的位置,然后根据屏幕的提示直接点 选[单击鼠标播放]或[自动播放]方式。 5. 在播放过程中,可以将鼠标移动到视频窗口中,单击一下,视频就能暂停播放。 如果想继续播放,再用鼠标单击一下即可。 这种方法,视频只能往前播放,而不能向后退。 二、插入控件播放视频 这种方法就是将视频文件作为控件插入到幻灯片中的,然后通过修改控件属性,达 到播放视频的目的。使用这种方法,有多种可供选择的操作按钮,播放进程可以完全自 己控制,更加方便、灵活。该方法更适合 PowerPoint课件中图片、文字、视频在同一 页面的情况。以下是具体的操作步骤: 实例:4-2在幻灯片上插入视频播放控件录像.exe 1. 运行 PowerPoint程序,打开需要插入视频文件的幻灯片。 2. 打开“控件工具箱”,点击“控件工具箱”最右边“其他控件”按钮。 立即出现下拉 列表。 3. 在下拉列表中,找到“Windows Media Player”选项,并选中,再将鼠标移动到 P owerPoint的编辑区域中,画出一个合适大小的矩形区域,随后该区域就会自动变为W indows Media Player的播放界面。 4. 用鼠标选中该播放界面,然后单击鼠标右键,从弹出的快捷菜单中选择“属性” 命令,打开该媒体播放界面的“属性”窗口。 5. 在“属性”窗口中,在“File Name”设置项处正确输入需要插入到幻灯片中视频文 件的详细路径及文件名。 若在 Powerpoint2003则在 URL处输入视频文件的路径及文 件名。这样在打开幻灯片时,就能通过[播放]控制按钮来播放指定的视频了 ,还可以[暂 停]及选择任意时间段来播放。 6. 在播放过程中,可以通过媒体播放器中的[播放]、[停止]、[暂停]和[调节音量] 等按钮对视频进行控制。 第四章 第三节 制作动画播放器 一、在 PowerPoint中播放 Flash动画 如果您使用 Flash创作软件创建了动画(或者从网上下载的动画资源), 并将其保存为 swf格式文件(.swf 文件扩展名),您可以使用特定的 Act iveX 控件和 Macromedia Flash 播放器在 PowerPoint演示文稿中播放 它。要运行 Flash 文件,必须在幻灯片中添加 ActiveX 控件并在该幻灯片 中创建一个指向 Flash 文件的链接。也可以在演示文稿中嵌入该文件。 1.控件的注册。 要在 PowerPoint 中播放 Flash 文件,必须将名为“Shockwave Flash Object”的 ActiveX 控件“注册”到您的计算机上。如果已注册,它将出现在 从“控件工具箱”中打开的控件列表中(将在下面的步骤中详细说明)。如 果未注册,请从 Macromedia Web 站点上下载 Macromedia Flash 播放 器的最新版本;它将在您的计算机上注册该控件。 您的计算机上可能已注册了较早版本的 Shockwave Flash Object。为 确保复杂动画能够正常运行,建议您安装 Macromedia Flash 播放器的最 新版本。 2.添加控件到幻灯片。在 PowerPoint 的普通视图下,单击“控件工具箱”-->“其他控 件”,在列表中,向下滚动并单击“Shockwave Flash Object”,然后将“+”鼠标放到幻灯片 上以绘制该控件(拉动鼠标,以适应动画的尺寸)。 3.为控件设置属性。在绘制好的 Flash控件上单击鼠标右键,然后单击“属性”。 在“按 字母序”选项卡中,单击 Movie 属性。在取值栏(Movie 旁边的空白单元格)中,键入 要播放的 Flash 文件的完整驱动路径(包括文件名在内。例如,D:\swf\m5408.swf) 。 4.要设置动画播放的特定选项,请执行以下操作,完成后关闭“属性”对话框(如右图): 确保 Playing 属性设为 Tr
本文档为【ppt_VBA编程初步】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
该文档来自用户分享,如有侵权行为请发邮件ishare@vip.sina.com联系网站客服,我们会及时删除。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
下载需要: 免费 已有0 人下载
最新资料
资料动态
专题动态
is_990007
暂无简介~
格式:pdf
大小:495KB
软件:PDF阅读器
页数:42
分类:互联网
上传时间:2014-03-31
浏览量:74