第7章 模块与VBA编程.ppt

  1. 1、本文档共50页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第7章 模块与VBA编程;第7章 模块与VBA编程 ;第7章 模块与VBA编程 ;7.1 模块的基本概念;7.1.1 类模块 ;7.1.2 标准模块 ;7.2 创建模块 ;大家应该也有点累了,稍作休息;7.2.1 在模块中加入过程 ;定义格式如下: Sub 子过程名 [程序代码] End Sub ;函数过程的定义 :函数过程通常情况下称为函数,是一系列由 Function 和 End Function 语句所包含起来的 VBA语句。Function 过程和 Sub 过程很类似,但函数过程可以通过函数名返回一个值。 定义格式如下: Function 函数过程名 As 返回值类型 [程序代码] End Function ;创建过程: 子过程或函数过程既可以在标准模块中建立,也可以在窗体模块中建立。 方法:在VBE中执行“插入|过程”菜单命令;7.2.2 在模块中执行宏 ;7.3 VBA编程基础 ;VBA是根据Visual Basic的简化宏语言,其基本语法、词法与Visual Basic基本相同,简单易学,采用的是一种面向对象的程序设计方法。与Visual Basic不同的是,VBA不是一个独立的开发工具,一般被嵌入到像Word, Excel, Access这样的宿主软件中,与其配套使用,从而实现程序开发功能。;7.3.1 面向对象程序设计基本概念 ;类是对象的抽象,而对象是类的具体实例,每个对象由类来定义。 DoCmd对象 :DoCmd对象的主要功能是通过调用Access内置的方法,在VBA中实现某些特定的操作 。 事件过程 对象在识别了所发和的事件后执行的代码叫事件过程。因此想要让系统响应某个事件,就要将响应事件所要执行的程序代码添加入相应的事件过程。;7.3.2 VBA的编程环境 ;启动VBE的常用三种方法;VBE环境中编写VBA代码 例7.1 新建一个窗体并在其上放置一个命令按钮,然后创建该命令按钮的“单击”事件响应过程。单击后弹出“测试完毕”消息。 ;7.3.3 基本数据类型 ;7.3.4 常量、变量、数组;常量:在程序运行的过程中其值不会发生变化 VBA支持4 种类型的常量:直接常量、符号常量、固有常量和系统定义常量。 变量:在程序运行的过程中其值是可以发生变化 变量定义:Dim… AS…; 变量的生存周期: 变量第一次(声明时)出现到消失时所持续的时间 . 数组: 是一个由相同数据类型的变量构成的集合,数组在使用之前应该加以声明,说明数据元素的类型、数组大小、数组的作用范围。 固定大小数组的声明: Dim 数组名([下标下界 To] 下标上界)[As 数据类型],如Dim Array(7) As Integer , Static Array(19, 19) As Integer ;;7.3.5 运算符与表达式 ;表达式的运算顺序 表达式的运算顺序由高到低为:函数运算、算术运算、关系运算、逻辑运算。 优先级高的运算先进行,优先级相同的运算依照从左向右的顺序进行 ;7.3.6 常用标准函数 ;例7.2 利用随机函数,设计一个“猜数字”游戏,如图7.13所示,用户从键盘输入1~6之间的任意数字,看是否和电脑随机出现的数字相同。;7.3.7 输入输出函数和过程 ;;MsgBox Msg[,type][,title]过程 MsgBox语句没有返回值,因此常被用于简单的信息显示 . ;7.4 VBA的流程控制 ;7.4.1 顺序控制 ;2. VBA的基本语句 赋值语句 格式:目标操作符=源操作符 注释语句 以关键字Rem开头引导的注释内容,可添加到程序任意位置。 以 ‘ 引导的注释内容,可直接出现在语句后面。 结束语句 格式:End 当在程序中执行End语句时,将终止当前程序,重置所有变量,并关闭所有数据文件 ;Private Sub Area() Rem 定义长、宽两个变量 Dim length As Single 长方形的长 Dim height As Single 长方形的宽 Rem 通过输入框输入长与宽,并将值变成数值型 length = Val(InputBox(请输入长方形的长)) height = Val(InputBox(请输入长方形的宽)) a = length * height 计算面积 MsgBox Str(a), vbDefaultButton1, 面积 End Sub ;7.4.2 条件语句 ;2. 块结构条件 格式: If 条件1 Then 语句块1 [ElseIf 条件2 Then 语句块2] [ElseIf 条件3 Then 语句块3] …… [Else 语句块n]

文档评论(0)

swj + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档