第8章 模和块BAV序程设计1

gxz1729110h1x1@6.3com1

第8 模块章和 章模 和VBA程序块设计 程序计设本章要求: 本要章求：1、了V解B编A环境程 、;了 编解环程境 编；程环境 、2握掌BV编A程础基：常，变量量，达表式 、;掌握编 基础：程 程编础 基常量变量，,表达式； 3、握掌序顺制控选，控制，择环控循 制、握顺掌控制，选择序控制，4、 解了BA模V 、了解 块块模

本章点：要 章本要：点掌顺握控制序选择，控，制 掌顺序握控制选择，制控循，环制控学时排安：学时 安排:6时(学理论+)6时(学实践) 学(理时论+6)时(学践)实学 时2zg1972x0111xh163@.cmo

第8 章块和模 模块和章VA程B序计 程序设计● 设模的概念 块●V A程B序计设础 基● 常标准函数用● VBA的程序构 ● V结BA的据数库程编 ●过调用和参数程递

3

zgx传1720111hx91@36c.om

第章8模块 章和 模和VBA程块序计设 序程计在A设cecss统中系把宏、,窗和报表等对象结体 合起来，不编用程写序码代就可建立以能较功善 完数的库据管系理统但宏。的能功有局是性限的它， 只处理能些简单一操的，如作要果实功现强大能 的据管数理，及灵以活的控制功，宏能对就象无能 力为。这时，就了需编要写序程块来模现上述实的功能。本章介绍模块 的概念和来建用模块的VBA语立 的言础知基识。4

zgx9170121h1@163xc.om

81 .模的块念概块模象对是Acces系统中s包含所7种的象对一之，模块和宏的使 有用些一相似之处。宏是由统自系生成动的程序模，块 而块模象对是VB用语言A编写的，VAB是fOicfe件软中内置的编 语言，程语与法Visua Blsic兼a。容1. 块模分的类 cAces sA在cces中，s模块为类分模和标块准块模种两类型 。(1)类.模块 模类块包括体模窗和报块表块，它们与模自各的 体 或窗报相关表。 窗体联模中的块事过程件的码用于响代窗体或应体窗上 件控触的发事件。报表块模的事件过中程的代用于码响应报表或 表上报控件的触事件发5。zxg97101211h@x63.c1m

o8

1 .块模概的念在窗体或表报的设视计中，图以可使下用方法打面开模块 码的编代辑窗口 工：具栏上“代的码按钮。 ”窗体为报表创或建件过程时，事系统会自动打开块模码编 辑窗代。 口体窗块和报表模块的作模范围用其所在属窗或报体内部，并表 随着窗或体报表打的开开始，随着窗而或报表的关闭体结束而 。类块也模可以依不窗体赖报或表单而独存在6

gxz97102111xh1@3.6omc

8.1

块的模念概(2).标准模 标准块块包模含与何其任他对象无都关常规过的，程以及可以 数据库任何从位置运的经行常用的使过。 程准标模和块某特定个对无象关类模块的的主要区别在 其范围和于生命周期。 标模块显示在准据库窗口数“的块模对象”,中 体、窗报和标表准模也块都显在“对象浏示览器对 话”中框。“象对浏览”器对框话于显用与当示项目前 关有引用和对象中对象库、属、性法和方常数信息的7。

gzx1720911hx@116.3oc

m8.

1 模的概块念2.模块的组 .成块由声明模区和过域两部程分成组声明区域用来，声模 明使块用变量的，过是模块程组的成单元过。分程两种为类： 子型过程(ub)和函S过程数F(ncuitno)。( )1过子 程过子又称为程Su过b程可以，执一行系操列作，返无回值。 义定式如格下： uS b过名程[程 代序] E码d nSb u以引可用子程过的名称调用该来过程子。在过名前程加关 上字Ca键l,l可显以式调用个一子程过 。z8g1x9201711h@x61.c3om

.1 8块模的概念:例简单的计算个1的两并和且能 调s用ho2

任w意两个数和的两 个3的9和gxz19207111hx@163.omc

8. 1块模的念概Su过程b例8- :下1面一个简单是验证密的的S码b过程u 。:下是一面简单个验证密的的Su码过b程。Su bCh ekcwdP ) D(i mPd AwsS ritng wd=PnIptuoBx“请(输密入！码” If) wPd”1=32456 The” nsMgBox”密码 正确欢，进入迎系！” 统lEe ssgMoBx 密码”错误！ E”n ifd ndE uSb1

0zgx9710211h1x1@6.3om

c.8 1块的模概(2)函数过念 函程过程数又称为uFntino过程，可以行一系列操作，执 返回值有定。义式如下： F格ucnitn o程过名 程序代[] End Fu码cniotn调 用函数过程时需要直，引接函数用过的名称程而 不，能用Call来使调执用行。

11

gx1z9721011xh163.@cmo

8.1 模块概的念例82:下面-编是写圆面求积的函过程。 数Fnutioc nraaer( sAS igle) nA singlS efIr = 0< henTMsg Bx "o圆径半必须是数！正 圆半"径必须是数正 圆半径！须必是正数 nE dIf ara =e 3141.9 *5 * rrEn d Fnctiou调用过程n: 用调程过12zxg97201111x@1h63.cmo

8. 1模的概念块3将.宏转换模为块 ①. 数据库在窗中，单击“宏口对象”,选要转择的宏。换 执行“文②件菜”中单“另存为”命的令打，“开存为另”对话框 ③ 在 对框的话保存“型” 类下列拉框表，中选择模块”“列表 项然后单，击“确定 ”钮按，幕显示屏“转宏” 换话 框对。

31

zg1x920171hx@116.3cm

8.2 VoAB程设计基础 序序设程基础计VBA是iVusla aBic sof Arplpictiao的缩写，n是微软O fifec系软列件内置编的语言程与V,isul aBsic具有 a相的语同言功。能在 VAB,程序是由过程中成组，过程由根据的VAB则书 写规指令组的。成个一序程括语包句变、、运量算符函数、 数、据库对、象事等件本要素。 基Access程在序设中，当计些操某作不能其用Ac他cses对象实 或现现起来实困难时，就可很利以用BAV言语编写码，代完 成这些杂任复。

务41zg1x7291011x@h16.3omc

8

2. VA程序B计基设础 程设序计基础.821 面.向象程序设计的基本概念对Ac esc内s的V嵌AB编程语言采，的是用前主流目的面 向对编象程制机可和化编程环境视，时也提 同了供访问数据库操和数作据表中录的基记方本法 。.1对象和 .类Acecs中的s、查表、询体、报窗、表页宏、模和块等都 数据库是的对象，而件控是体或报表窗的对象。每个中不 同对的都象通过同不属的性相区互分对象。属性的其按类别会 有不同，所而同且一对象的同实不属例性构成也可能差异。有15

zxg17209111xh163@c.om

8.

2VB A程设计基础序 序程设计基1.础对和类 .具象相同属性和有法的对方象组成就类了，窗体或报在表设计视图 口窗，中具箱工中每的控件就个是个一类而在窗体或 报，中创建表的体控具件则这是类个的象。而属对于同一个的类两个对象是通 过属值性区分来的 。ccessA的中、表查询、窗、体表报、页宏、和模块象对 也类，是为称象对。A类cess数c库据窗左口显示的就是数据侧库 对象的，类单某个对击象可类打开相以对象应口窗。 对除象属了性以还外有方法对。象的法就方对是可象执以 行的行为1。

6zxg1720119hx@3

8.2 VAB程序设基计础程序设计基础 2属.性、方法和事 件属.性属性、、法和方件事构了对成象的基本素要。 性描述了属象的对质性，如例，文本控框件对象中的称、名字体的 关相属性等。 引方用式：对象.属为 性例:Lab如el6Capt.on i=ar eax()方 描法了述象对的为行，即在某个象上执行的一个过程. 引用对方式为对：.象法 例如方 :Text1SetFoc.su 事是由件cAessc义定好，的可以窗被体报、表及以窗体或表 上的报控件等象所识对别的作动 如单。击失去,焦点等.1

7zxg9712101h1x@3

82. VBA序设计程础基程序 计设础基在Access数据库系统里可以，通以过下种两方来处式窗理、 报表体控或的件件响事。应● 用使宏对象来设置件属事性。 ● 为个某件事写VBA编码代过，程成指定动完作这，代 码种过称程为件过程事或件事响代码。对应象名称事 件动 O作nLod anLUao dOOpnn 窗e 体OCnosel OCnick lOnDlClickb nMouseDownzgx19O20711h1@16x.3ocm动作说明 窗体加载发时事生 窗体卸件载发时生件 窗事体开打发生事件时 体窗闭关时生发事 窗体件单击发时生事件窗体双击时发 生件 事窗鼠标按体时下发事生件18

8.2VBA 序设计基程 础程设计基础序nKeyOPressOnKeyDo w nOnOenpOn ClseoO Cnlick窗体上 键按盘键时生事发件 体窗上键盘按键时发生事下 报表打开件时生事件 发报关闭时表发生事 件按单击时钮发事生 件按钮双击时生事发 件按获得钮入输点之焦前生发件 事

按钮获得入输点时焦生发事件按 钮鼠标上下按发生事时 件按上钮键按键盘时生发事件按钮上键 按盘下键发生时事 19

件报

表OnDlblicC kOEnntre命令 按O neGtFuosc钮 控件 OMnuosDeonw OKenPreys OnsKyDewozng1x790211h1@1x3.6oc