模块
+ W3 W ?4 i7 |" G一、模块的基本概念 7 m" ^, l( @- T% p5 K/ L# i
以vba(Visual Basic for Application)语言编写的,以函数过程(function)或 子过程 (sub )为单元的集合方式存储。 * m7 Z$ B4 A1 I4 M) M7 U6 P
模块分为类模块和标准模块。类模块分为窗体模块和报表模块,从属于所在的窗体和报表。
. b2 g/ J$ P/ s! {6 _0 f: _" w. d二、引用窗体报表属性或窗体报表控件的属性 6 [- N/ x) j( {# F# @
1、引用窗体或报表属性的方式
8 X0 W) t7 u, wForms!窗体名!属性名 4 h& N" F6 M1 W t, r& w3 K
reports!报表名! 属性名 - K! L- P5 B' j4 J0 e$ O) l1 u
如果是引用当前的窗体或报表的属性可以用
2 T; S }' R8 T) Wme.属性名
# X8 o9 X* a1 m. ?$ z/ X常用的属性有 * M" |" @/ h( A G! R# z
标题:caption ,记录源:Recordsource (用来控制窗体和报表里面的控件显示的字段是取自哪个表的,该属性可以是表名,查询名,或sql语句。) 3 Q2 ^3 O' g( U1 o: ?( K3 v
2、引用窗体或报表控件的属性
I* O2 {2 q7 d. Y* lforms!窗体名!控件名.[属性名] / Y8 T1 G9 k% {1 T9 t* m/ G
reports!报表名!控件名.[属性名]
/ M6 ?0 U5 k5 H- x! P有些控件是存在默认属性的,比如文本框的默认属性是text属性(该属性值是该文本框里面填写的内容。), 6 X6 `$ i* {# K) D1 x: u7 f2 \
常用的属性有: & _& }6 V! Z% n
标题:caption,可见性:visible(该属性是用来控制控件是否在窗体视图中是否显示的,当该属性值为false时,该控件不显示,当该属性值为true时,控件显示。);是否有效:(enabled,该属性用来控制控件是否可用,主要是命令按钮有,当该属性值为false时,控件不可用,当该属性值为true时,可用);前景色:(forecolor,该属性用来控制控件的文字显示颜色);
0 {) Y9 s& n' @& }9 {3 e7 d5 x" q引用文本text属性时,通常省略属性名,直接写文本框的名字就可以了,text属性获得的值的类型是字符串。 : G* H2 w6 I% n% G% q. S/ `; o
三、常用的事件过程 / I a8 c! a7 } q' K6 ^0 S9 X+ T0 W
1、窗体事件过程的命名方式 , s6 Z- t& u1 }! z- M- H
sub form_事件名() 1 d2 q/ E5 |* [2 g
语句序列 1 g" a3 b. a1 x. }' F% r
end sub
* }3 X+ t! G3 f/ C常用的窗体事件 3 I. u7 L/ G# `9 `- d' W4 E
form_click() 单击窗体时,发生。
, y# f1 D$ E! G6 ~form_open() 打开事件,打开窗体时发生。
. c- u7 c& m- m/ w( ]form_load() 加载事件,打开窗体加载显示记录时发生,在打开事件之后,不管里面是否会有记录显示,都会发生该事件。
* j3 a0 D+ L+ ^3 ~/ ?( b4 A+ zform_timer() 计时器事件,与该事件配合使用的属性是计时器间隔(TimerInterval),该属性是用来控制每间隔多少时间重复的执行计时器事件过程,单位为毫秒,当该属性值为0时,就会停止执行计时器事件过程。 + n, B6 J. Z' J. K6 y* t& |2 m# ]
2、控件事件过程的命名方式。 9 U- C H% m9 y
sub 控件名_事件名() ) Y- o- Z, x0 W+ |* Y. E3 J* S, x) q
end sub % N1 E% e# n4 `. b
常见的事件过程。
4 n: B/ g" T& `$ o控件名_click() 单击事件过程。 ; }2 g# O3 e8 z0 S/ y
有些控件有自己特有的事件过程。比如文本框的更新事件(change)。该事件过程是在文本框里面的内容发生改变的时候会执行该事件过程。 |