模块与VBA编程基础(9)

2019-07-30 13:16

Docmd.Close[,objecttype][,objectname][,save]

实际上,由DoCmd.Close命令参数看到,该命令可以广泛用于关闭Access各种对象。省略所有参数的命令(DoCmd.Close)可以关闭当前窗体。 例9.2 关闭名为“学生信息登陆”窗体。 DoCmd.Close acForm,\学生信息登录\

如果“学生信息登录”窗体就是当前窗体,则可以使用语句:DoCmd.Close。 二、输入框(InputBox)

输入框用于在一个对话框中显示提示,等待用户输入正文并按下按钮、返回包含文本框内容的字符串数据信息。它的功能在VBA中是以函数的形式调用使用,其使用格式如下:

InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])

调用该函数,当中间若干个参数省略时,分隔符逗号“,”不能缺少。 图9.1显示的是打开输入(InputBox)对话框的一个例子。

调用语句:strName=InputBox(\请输入姓名:\ 三、消息框(MsgBox)

消息框用于在对话框中显示消息,等待用户单击按钮,并返回一个整形值告诉用户单击哪一个按钮。其使用格式如下:

MsgBox(prompt[,buttons][,title][,helpfile][,context])

图9.2显示的是打开消息(MsgBox)对话框的一个例子。

调用语句:MsgBox\处理数据结束!\消息\。显示消息框如图9.2。 四、VBA编程验证数据

使用窗体和数据访问页,每当保存记录数据时,所做的更改便会保存到数据源表当中。在控件中的数据被改变之前或记录数据被更新之前会发生BeforeUpdate事件。通过创建窗体或控件的BeforeUpdate事件过程,可以实现对输入到窗体控件中的数据进行各种验证。例如,数据类型验证、数据范围验证等。

五、计时事件(Timer)

VB中提供Timer时间控件可以实现“定时”功能。但VBA并没有直接提供Timer时间控件,而是通过设置窗体的“计时器间隔(TimerInterval)”属性与添加“计时器触发(Timer)”事件来完成类似“定时”功能。

其处理过程是:Timer事件每隔TimerInterval时间间隔就会被激发一次,并运行Timer事件过程来响应。这样重复不断,即实现“定时”处理功能。

六、鼠标和键盘事件处理

在程序的交互式操作过程中,鼠标与键盘是最常用的输入设备。 1.鼠标操作

涉及鼠标操作的事件主要有MouseDown(鼠标按下)、MouseMove(鼠标移动)和MouseUp(鼠标抬起)3个,其事件过程形式为(XXX为控件对象名):

XXX_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) XXX_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) XXX_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)

其中Button参数用于判断鼠标操作的是左中右哪个键,可以分别用符号常量acLeftButton(左键1)、acRightButton(右键2)和acMiddleButton(中键4)来比较。Shift参数用于判断鼠标操作的同时,键盘控制键的操作,可以分别用符号常量acAltMask(Shift键1)、acAltMask(Ctrl键2)和acAltMask(Alt键4)来比较。X和Y参数用于返回鼠标操作的坐标位置。

2.键盘操作

涉及键盘操作的事件主要有KeyDown(键按下)、KeyPress(键按下)和KeyUp(键抬起)3个,其事件过程形式为(XXX为控件对象名):

XXX_KeyDown(KeyCode As Integer,Shift As Integer) XXX_KeyPress(KeyAscii As Integer)

XXX_KeyUp(KeyCode As Integer,Shift As Integer)

其中KeyCode参数和KeyAscii参数均用于返回键盘操作键的ASCII值。这里,KeyDown和KeyUp的KeyCode参数常用于识别或区别扩展字符键(F1~F12)、定位键(Home、End、PageUp、PageDown、向上键、向下键、向左键、向左键及Tab)、键的组合和标准的键盘更改键(Shift、Ctrl或Alt)及数字键盘或键盘数字键等字符。KeyPress的KeyAscii参数常用于识别或区别英文大小写、数字及换行(13)和取消(27)等字符。Shit参数用于判断键盘操作的同时,控制键的操作。

七、用代码设置Access选项

Access系统环境有许多选项设定(工具/选项菜单项),值不同会产生不同的效果。比如当程序中执行某个操作查询(更新、删除、追加、生成表)时,有些环境会弹出一些恼人的提示信息要求确认等。所有选项设定均可在Access环境下静态设置,也可以在VBA代码里动态设置。

其语法为:

Application.SetOption(OptionName,Setting)

这里,程序中的optionName参数为选项名称,一般为英文;Setting为设置的选项值。


模块与VBA编程基础(9).doc 将本文的Word文档下载到电脑 下载失败或者文档不完整,请联系客服人员解决!

下一篇:16秋福建师范大学《学前儿童体育教育》在线作业一

相关阅读
本类排行
× 注册会员免费下载(下载后可以自由复制和排版)

马上注册会员

注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信: QQ: