VBA填空选择(答案)

1.假设窗体的名称为fmTest，则把窗体的标题设置为“Access Test”的语句是A) Me = “Access Test” B) Me.Caption = “Access Test”C) Me.text = “Access Test” D) = “Access Test”讲解：窗体的标题属性用me.caption，D选项Name代表名称，但窗体没有名称属性, Form.caption2.执行语句：MsgBox “AAAA”，vbOKCa ncel + vbQuestion ,“BBBB”之后，弹出的信息框外观样式是C讲解：消息框第一个参数：提示信息（必不可少的），第二个参数：按钮+图标类型，第三个参数：标题消自动运行，打开数据库时按住shift键即可4.Access的窗体对象或报表事件可以有两种方法响应：宏对象和答案：事件过程5.下图所示的窗体上有一个命令按钮（名称为Command1）和一个选项组（名称为Framel），选项组上显示“Framel”文本的标签控件名称为Labell，若将选项组上显示文本“Frame1”改为汉字“性别”，应使用的语句是label1.caption=”性别”。

讲解：标签上的文本使用caption属性6.在当前窗体上，若要实现将焦点移动到指定控件，应使用的宏操作命令是GotoControl。

7.若在“销售总数”窗体中有“订货总数”文本框控件，能够正确引用控件值的是A）Forms.[销售总数].[订货总数]B）Forms![销售总数].[订货总数]C）Forms.[销售总数]![订货总数]命令按钮，名称分别为Label1和bChange。

9.在“窗体视图”显示该窗体时，要求在单击命令按钮后标签上显示的文字颜色变为红色，以下能实现该操作的语句是A）label1.ForeColor = 255 B）bChange.ForeColor = 255C）label1.ForeColor = "255" D）bChange.ForeColor = "255"标签文本颜色：ForeColor,值为数字型10.若将窗体的标题设置为“改变文字显示颜色”，应使用的语句是A）Me ="改变文字显示颜色"B）Me.Caption="改变文字显示颜色"C）Me.text="改变文字显示颜色"D）="改变文字显示颜色"11.在“窗体视图”中显示窗体时，窗体中没有记录选定器，应将窗体的“记录选定器”属性值设置为A）是B）否C）有D）无12.为窗体或报表上的控件设置属性值的正确宏操作命令是A）Set B）SetData C）SetWarnings D）SetV alue13.因修改文本框中的数据而触发的事件是A) Change B）Edit C）Getfocus D）LostFocus14.2007.4(10)退出Access应用程序的VBA代码是【10】。

Docmd.Quit15.直接在属性窗口设置对象的属性，属于“静态”设置方法，在代码窗口中由VBA 代码设置对象的属性叫做“__动态_____”设置方法。

16.A ccess 中用于执行指定的SQL 语言的宏操作名___RunSQL__。

RunMacro17.发生在控件接收焦点之前的事件是A）Enter B）Exit C）GotFocus D）LostFocus18.如果加载一个窗体，先被触发的事件是A．Load 事件B．Open事件C．Click 事件D．DbClick事件19.现有一个已经建好的窗体，窗体中有一命令按钮，单击此按钮，将打开“tEmployee”表，如果采用VBA代码完成，下面语句正确的是A．docmd.openform ″tEmployee″打开窗体B ．docmd.openview ″tEmployee″C ．docmd.opentable ″tEmployee″ 打开表D ．docmd.openreport ″tEmployee″ 打开报表20. 在VBA 中要打开名为“学生信息录入”的窗体，应使用的语句是A ）DoCmd . Op enForm ”数据信息录入”B ）OpenForm ”数据信息录入”C ）DoCmd . OpenWindow ”数据信息录入”D ）OpenWindow ”数据信息录入”21. A ccess 的控件对象可以设置某个属性来控制对象是否可用（不可用时显示为灰色状态）。

需要设置的属性是A ．Default 默认值B ．Cancel 针对按钮设置，如果值为真，按ESC 自动执行该按钮功能C ．Enabled 可用不可用D ．Visible 可见不可见22. 在窗体中添加了一个文本框和一个命令按钮（名称分别为tText 和bCommand ），并编写了相应的事件过程。

运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为“计算机等级考试”。

以下能实现上述操作的事件过程是D讲解：事件应该是在文本框的内容发生变化时执行，所以为文本框的change 事件23. 2006.4(填14) 窗体中有两个命令按钮：“显示”（控件名为cmdDisplay ）和“测试”（控件名为cmdTest ）。

以下事件过程的功能是：单击“测试”按钮时，窗体上弹出一个消息框。

如果单击APrivate Sub bCommand_Click( )Caption=”计算机等级考试”End Sub B ）Private Sub tText_Click( ) bCommand.Caption=”计算机等级考试” End SubC ）Private Sub bCommand_Change( )Caption=”计算机等级考试”End Sub D ）Private Sub tText_Change( ) bCommand.Caption=”计算机等级考试” End Sub消息框的“确定”按钮，隐藏窗体上的“显示”命令按钮；单击“取消”按钮关闭窗体。

按照功能要求，将程序补充完整。

Private Sub cmdTest_Click()Answer= msgbox （“隐藏按钮”，vbOKCancel）If Answer=vbOK ThencmdDisplay.Visible= falseElseDocmd.CloseEnd IfEnd Sub24.下列过程的功能是：通过对象变量返回当前窗体的Recordset属性记录集引用，消息框中输出记录集的记录（即窗体记录源）个数Sub GetRecNum( )Dim rs As ObjectSet rs = Me.RecordsetMsgBoxEnd Sub程序空白处应填写的是：A）Count B）rs.Count C）RecordCount D）rs. RecordCount 25.下列程序段的功能是实现“学生”表中“年龄”字段值加1Dim Str As StringStr=" "Docmd.RunSQL Str空白处应填入的程序代码是A）年龄=年龄+1B）Update学生Set 年龄=年龄+1C）Set 年龄=年龄+1D）Edit 学生年龄=年龄+l26.006.9(填9) 某窗体中有一命令按钮，名称为C1。

要求在窗体视图中单击此命令按钮后，命令按钮上显示的文字颜色为棕色（棕色代码为128），实现该操作的VBA语句是_c1.forecolor=128___。

27.在窗体上有一个文本框控件，名称为Text1。

同时，窗体加载时设置其计时器间隔为1秒、计时器触发事件过程则实现在Text1 文本框中动态显示当前日期和时间。

请补充完整。

Private Sub Form_Load()Me.TimerInterval=1000End SubPrivate Sub __Form_Timer()_____ 窗体的计时器触发事件Me.Text1=Now()End Sub28.假设某数据库已建有宏对象“宏1”，“宏1”中只有一个宏操作SetV alue,其中第一个参数项目为“[Label0].[Caption]”,第二个参数表达式为“[Text0]”,窗体“fmTest”中有一个标签Label0和一个文本框Text0,现设置控件Text0的“更新后”事件为运行“宏1”，则结果是A）将文本框清空B）将标签清空C）将文本框中的内容复制给标签的标题，使二者显示相同内容D）将标签的标题复制到文本框，使二者显示相同内容讲解：setvalue宏，第一个参数：要设置的项目，第二个参数：给第一个参数设置的具体值29.2007.9（32）在窗体中有一个标签Label0，标题为“测试进行中”；有一个命令按钮Command1；事件代码如下：Private Sub Command1_Click( )Label0.Caption = "标签"End SubPrivate Sub Form_Load( )Form.Caption = "举例"Command1.Caption = "移动"End Sub打开窗体后单击命令按钮，屏幕显示______。

A）B）C）D）30.在下图所示的窗体上，有一个标有“显示”字样的命令按钮（名称为Command1）和一个文本框（名称为text1）。

当单击命令按钮时，将变量sum 的值显示在文本框内，正确的代码是（）。

A）Me!Text1.Caption=sumB）Me!Text1.V alue=sum value属性：可以为文本型或数字型数据C）Me!Text1.Text=sum text属性：只能为文本型数据D）Me!Text1.Visible=sum31.在VBA 中，实现窗体打开操作的命令是（）。

A）DoCmd.OpenForm B）OpenFormC）Do.OpenForm D）DoOpcn.Form32.执行语句：MsgBox ”AAAA”, vbOKCancel+vbQuetion, “BBBB”之后，弹出的信息框A）标题为“BBBB”、框内提示符为“惊叹号”、提示内容为“AAAA”B）标题为“AAAA”、框内提示符为“惊叹号”、提示内容为“BBBB”C）标题为“BBBB”、框内提示符为“问号”、提示内容为“AAAA”D）标题为“AAAA”、框内提示符为“问号”、提示内容为“BBBB”33.）窗体中有3个命令按钮，分别命名为Command1、Command2和Command3。

当单击Command1按钮时，Command2按钮变为可用，Command3按钮变为不可见。