模块和vba程序设计.pptxVIP

  • 2
  • 0
  • 约2.31万字
  • 约 138页
  • 2020-03-02 发布于上海
  • 举报
第8章 模块和VBA程序设计第8章 模块和VBA程序设计本章要求: 1、了解VBA编程环境; 2、掌握VBA编程基础:常量,变量,表达式; 3、掌握顺序控制,选择控制,循环控制 4、了解VBA模块本章要点:掌握顺序控制,选择控制,循环控制学时安排: 6学时(理论)+6学时(实践)第8章 模块和VBA程序设计● 模块的概念● VBA程序设计基础 ● 常用标准函数 ● VBA的程序结构 ● VBA的数据库编程 ● 过程调用和参数传递 第8章 模块和VBA程序设计 在Access系统中,把宏、窗体和报表等对象结合起来,不用编写程序代码就可以建立功能较完善的数据库管理系统。但宏的功能是有局限性的,它只能处理一些简单的操作,如果要实现功能强大的数据管理,以及灵活的控制功能,宏对象就无能为力了。这时,就需要编写程序模块来实现上述的功能。本章介绍模块的概念和用来建立模块的VBA语言的基础知识。8.1 模块的概念 模块对象是Access系统中所包含的7种对象之一,模块和宏的使用有一些相似之处。宏是由系统自动生成的程序模块,而模块对象是用VBA语言编写的,VBA是Office软件中内置的编程语言,语法与Visual Basic兼容。 1.模块的分类 在Access中,模块分为类模块和标准模块两种类型。 (1).类模块 类模块包括窗体模块和报表模块,它们与各自的 窗体 或报表相关联。 窗体模块中的事件过程的代码用于响应窗体或窗体 上控件的触发事件。报表模块中的事件过程的代码用于 响应报表或报表上控件的触发事件。 8.1 模块的概念 在窗体或报表的设计视图中,可以使用下面方法打开模块代码的编辑窗口: 工具栏上的“代码”按钮。 为窗体或报表创建事件过程时,系统会自动打开模块代码编辑窗口。 窗体模块和报表模块的作用范围在其所属窗体或报表内部,并随着窗体或报表的打开而开始,随着窗体或报表的关闭而结束。 类模块也可以不依赖窗体或报表而单独存在8.1 模块的概念(2).标准模块 标准模块包含与任何其他对象都无关的常规过程,以及可以从数据库任何位置运行的经常使用的过程。标准模块和某个特定对象无关的类模块的主要区别在于其范围和生命周期。 标准模块显示在数据库窗口的“模块”对象中,窗体、报表和标准模块也都显示在“对象浏览器”对话框中。“对象浏览器”对话框用于显示与当前项目有关和引用对象库中对象、属性、方法和常数的信息。 8.1 模块的概念2.模块的组成 模块由声明区域和过程两部分组成,声明区域用来声明模块使用的变量,过程是模块的组成单元。过程分为两种类型:子过程(Sub)和函数过程(Function)。(1)子过程 子过程又称为Sub过程,可以执行一系列操作,无返回值。定义格式如下: Sub 过程名 [程序代码] End Sub 可以引用子过程的名称来调用该子过程。在过程名前加上关键字Call,可以显式调用一个子过程。8.1 模块的概念例:简单的计算两个1的和并且能调用show2任意两个数的和两个3的和8.1 模块的概念例:通过窗体事件也可调用子过程8.1 模块的概念例8-1:下面是一个简单的验证密码的Sub过程。Sub CheckPwd( ) Dim Pwd As String Pwd=InputBox(“请输入密码!”) If Pwd=”123456” Then MsgBox ”密码正确,欢迎进入系统!” Else MsgBox ”密码错误!” End ifEnd Sub8.1 模块的概念2.模块的组成(2)函数过程 函数过程又称为Funtion过程,可以执行一系列操作,有返回值。定义格式如下: Function 过程名 [程序代码] End Function 调用函数过程时,需要直接引用函数过程的名称,而不能使用Call来调用执行。8.1 模块的概念例8-2:下面是编写求圆面积的函数过程。 Function area(r As Single) As Single If r = 0 Then MsgBox 圆半径必须是正数! End If area = 3.14159 * r * rEnd Function调用过程:例:通过窗体事件也可调用函数8.1 模块的概念3.将宏转换为模块 根据要转换宏的类型不同,转换操作有两种情况,一种是转换窗体或报表中的宏,另一种是转换不属于任何窗体和报表的全局宏。(1)转换窗体或报表中的宏 在设计视图中打开窗体。 执行“工具/宏/将窗体的宏转换为Visual Basic代码”命令,屏幕显示“转换窗体宏”对话框。 8.1 模块的概念3.将宏转换为模块(2)转换全局宏将全局宏转换为模块的具体步骤说明如下:① 在数据库窗口中,单击“宏”对象,选择要转换的宏。② 执行“文件”菜单中的“另存为”命令,打开“

文档评论(0)

1亿VIP精品文档

相关文档