模块和vba程序设计

《模块和vba程序设计》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、10/4/20211第8章模块和VBA程序设计1本章要求：1、了解VBA编程环境；2、掌握VBA编程基础：常量，变量，表达式；3、掌握顺序控制，选择控制，循环控制4、了解VBA模块本章要点：掌握顺序控制，选择控制，循环控制学时安排：6学时(理论）+6学时(实践）第8章模块和VBA程序设计2第8章模块和VBA程序设计●VBA程序设计基础●模块的概念●常用标准函数●VBA的程序结构●VBA的数据库编程●过程调用和参数传递3在Access系统中，把宏、窗体和报表等对象结合起来，不用编写程序代码就可以建立功能较完善的数据库管理系统。但宏的功能是有局限性

2、的，它只能处理一些简单的操作，如果要实现功能强大的数据管理，以及灵活的控制功能，宏对象就无能为力了。这时，就需要编写程序模块来实现上述的功能。本章介绍模块的概念和用来建立模块的VBA语言的基础知识。第8章模块和VBA程序设计48.1模块的概念模块对象是Access系统中所包含的7种对象之一，模块和宏的使用有一些相似之处。宏是由系统自动生成的程序模块，而模块对象是用VBA语言编写的，VBA是Office软件中内置的编程语言，语法与VisualBasic兼容。1.模块的分类在Access中，模块分为类模块和标准模块两种类型。(1)．类模块类模块包括

3、窗体模块和报表模块，它们与各自的窗体或报表相关联。窗体模块中的事件过程的代码用于响应窗体或窗体上控件的触发事件。报表模块中的事件过程的代码用于响应报表或报表上控件的触发事件。58.1模块的概念在窗体或报表的设计视图中，可以使用下面方法打开模块代码的编辑窗口：工具栏上的“代码”按钮。为窗体或报表创建事件过程时，系统会自动打开模块代码编辑窗口。窗体模块和报表模块的作用范围在其所属窗体或报表内部，并随着窗体或报表的打开而开始，随着窗体或报表的关闭而结束。类模块也可以不依赖窗体或报表而单独存在68.1模块的概念(2)．标准模块标准模块包含与任何其他对象

4、都无关的常规过程，以及可以从数据库任何位置运行的经常使用的过程。标准模块和某个特定对象无关的类模块的主要区别在于其范围和生命周期。标准模块显示在数据库窗口的“模块”对象中，窗体、报表和标准模块也都显示在“对象浏览器”对话框中。“对象浏览器”对话框用于显示与当前项目有关和引用对象库中对象、属性、方法和常数的信息。7模块由声明区域和过程两部分组成，声明区域用来声明模块使用的变量，过程是模块的组成单元。过程分为两种类型：子过程（Sub）和函数过程（Function）。（1）子过程子过程又称为Sub过程，可以执行一系列操作，无返回值。定义格式如下：Su

5、b过程名[程序代码]EndSub可以引用子过程的名称来调用该子过程。在过程名前加上关键字Call，可以显式调用一个子过程。8.1模块的概念2．模块的组成8例：简单的计算8.1模块的概念任意两个数的和两个3的和两个1的和并且能调用show29例:通过窗体事件也可调用子过程8.1模块的概念10例8-1：下面是一个简单的验证密码的Sub过程。SubCheckPwd()DimPwdAsStringPwd=InputBox(“请输入密码！”)IfPwd=”123456”ThenMsgBox”密码正确，欢迎进入系统！”ElseMsgBox”密码错误！”En

6、difEndSub8.1模块的概念11（2）函数过程函数过程又称为Funtion过程，可以执行一系列操作，有返回值。定义格式如下：Function过程名[程序代码]EndFunction调用函数过程时，需要直接引用函数过程的名称，而不能使用Call来调用执行。8.1模块的概念2．模块的组成12例8-2：下面是编写求圆面积的函数过程。Functionarea(rAsSingle)AsSingleIfr<=0ThenMsgBox"圆半径必须是正数！"EndIfarea=3.14159*r*rEndFunction8.1模块的概念调用过程:13例:通

7、过窗体事件也可调用函数143．将宏转换为模块8.1模块的概念根据要转换宏的类型不同，转换操作有两种情况，一种是转换窗体或报表中的宏，另一种是转换不属于任何窗体和报表的全局宏。（1）转换窗体或报表中的宏在设计视图中打开窗体。执行“工具/宏/将窗体的宏转换为VisualBasic代码”命令，屏幕显示“转换窗体宏”对话框。15将全局宏转换为模块的具体步骤说明如下：①在数据库窗口中，单击“宏”对象，选择要转换的宏。②执行“文件”菜单中的“另存为”命令，打开“另存为”对话框（2）转换全局宏8.1模块的概念③在对话框的“保存类型”下拉列表框中，选择“模块”

8、列表项，然后单击“确定”按钮，屏幕显示“转换宏”对话框。3．将宏转换为模块16VBA是VisualBasicforApplication的缩写，是微软