Access：“零售商店管理信息系统”宏对象属性设计.pptVIP

10.5 “零售商店管理信息系统”宏对象属性设计 ;10.5.1 “AutoExec”宏对象; 命名为“AutoExec”的宏对象是Access 2003数据库中的一个特殊功能宏。首次打开一个Access 2003数据库时，Access 2003将自动寻找这个宏对象，如果找到了的话，Access 2003就会去执行这个宏所指定的操作序列。 基于Access 2003的这一特性，“零售商店管理信息系统”数据库中创建了这个名为“AutoExec”的特殊宏，以保证一旦打开“零售商店管理信息系统”数据库，即刻执行这个宏所设定的操作。 ; 实际上，“零售商店管理信息系统”数据库中的“AutoExec”宏只包含一项打开窗体的操作： OpenForm “零售商店管理信息系统” , acNormal, , , , acNormal 用于在打开“零售商店管理信息系统”数据库时，自动打开“零售商店管理信息系统”的主控窗口“零售商店管理信息系统” ，使得发布的数据库应用系统得以顺利启动。 ; “零售商店管理信息系统”数据库中的“AutoExec”宏对象设计参数如图10-11所示。 ;图10-11 “AutoExec”宏对象设计视图 ;10.5.2 “柜存信息”宏对象 ; 为了方便营业员在销售商品的过程中随时地查阅柜存商品信息，在“零售商店管理信息系统”数据库中创建了一个名为“柜存信息”的宏。在“销售数据录入”窗体运行期间，单击窗口中的“柜存信息”命令按钮“ ”，即可刻执行这个宏所设定的操作。 ;实际上，“零售商店管理信息系统”数据库中的“柜存信息”宏只包含两项操作，第一项为给出即将进入柜存数据查询的操作提示，第二项为打开“商品柜存数据查询”窗体的操作。将其转换为等价的VBA程序，其内容为： ------------------------------------------------------------ 柜存信息 ------------------------------------------------------------ Function 柜存信息() On Error GoTo 柜存信息_Err 给出进入柜存数据查询的提示 ;Beep MsgBox 进入柜存记录查询, vbOKOnly, 柜存信息 打开“商品柜存数据查询”窗体 DoCmd.OpenForm 商品柜存数据查询, acNormal, , , acReadOnly, acNormal 柜存信息_Exit: Exit Function 柜存信息_Err: MsgBox Error$ Resume 柜存信息_Exit End Function ; “零售商店管理信息系统”数据库中的“柜存信息”宏对象设计参数如图10-12所示。 ;图10-12 “柜存信息”宏对象设计视图