（ 14 ）窗体中有两个命令按钮： “ 显示 ” （控件名为 cmdDisplay ）和 “ 测试 ” （控件名为 cmdTest ） 。 以下事件过程的功能是：单击 “ 测试 ” 按钮时，窗体上弹出一个消息框。如果单击消息框的 “ 确定 ” 按钮 ，隐藏窗体上的 “ 显示 ” 命令按钮；单击 “ 取消 ” 按钮关闭窗体。按照功能要求，将程序补充完整。

Private Sub cmdTest_Click()

A．nswer= ( 14 ) （ “ 隐藏按钮 ” ， vbOKCancel ）

If Answer=vbOK Then

cmdDisplay.Visible= ( 15 )

E．lse

D．ocmd.Close

E．nd If

E．nd Sub

[试题]（ 12 ）窗体中有两个命令按钮： “ 显示 ” （控件名为 cmdDisplay ）和 “ 测试 ” （控件名为 cmdTest ） 。 当单击 “ 测试 ” 按钮时 ， 执行的事件功能是 ： 首先弹出消息框 ， 若单击其中的 “ 确定 ” 按钮 ， 则隐藏窗体上的 “ 显示 ” 按钮：否则直接返回到窗体中。请在空白处填入适当的语句，使程序可以完成指定的功能。Private Sub cmdTest Click （ ）A．nswer= ( 12 )（ “ 隐藏按钮？ ” ， vbOKCancel+

[试题]窗体中有两个命令按钮：“显示”（控件名为cmdDisplay）和“测试”（控件名为cmdTest）。以下事件过程的功能是：单击“测试”按钮时，窗体上弹出一个消息框。如果单击消息框的“确定”按钮，隐藏窗体上的“显示”命令按钮；单击“取消”按钮关闭窗体。按照功能要求，将程序补充完整。 Private Sub cmdTest_Click（）A．nswer= （“隐藏按钮”，vbOKCancel）If Answer=vbOK ThencmdDisplay.Visible=E．lseD．ocmd.Close

[主观题]在一个工程中有两个窗体，窗体Form1上有一个命令按钮Disp，单击该按钮，Form1窗体隐藏，显示Form2窗体，程序如下，请补充完整。Private Sub Disp_Click （）Me.HideF．orm2. (10)E．nd Sub

[试题]（ 11 ）在窗体中有一个名为 command 的命令按钮， click 事件的代码如下：private sub command1_click()f=0for n=1 to 10 step 2f=f+nnext nme!lb1.caption=fend sub单击命令按钮后，标签显示的结果是 ___[11]___ 。

[主观题]窗体上有两个按钮：显示(cmdshow)按钮和测试按钮(cmdtest)，显示按钮初始状态不可见，当单击测试按钮，弹出一个消息框，包括“确定”和“取消”按钮，若单击“确定”则显示“显示”按钮，若单击“取消”则关闭窗体。试将程序补充完整。Private sub cmdtest_click( )answer = msgbox ( "显示按钮", vbOkCancel)If answer = vbOK thencmdshow. visible = [ ]E．lsedocmd. closeE．nd

[试题]（ 12 ）在窗体中有一个名为 Command12 的命令按钮， Click 事件的代码如下：该事件所完成的功能是：接受从键盘输入的 10 个大于 0 的整数，找出其中的最大值和对应的输入位置。请依据上述功能要求将程序补充完整。Private Sub Command12_Click( )max=0max_n=0F．or i=1 To 10num=Val(InputBox(" 请输入第 "& i &" 个大于 0 的整数： "))If (num>max)Thenmax=

[单选题]窗体中有3个命令按钮，分别命名为Commandl、Command2和Command3。当单击Cmmandl按钮时，Command2按钮变为可用，Command3按钮变为不可见。下列Corn．mandl的单击事件过程中，正确的是A．Private Sub Commandl—click() Command2．ViSible=True Command3．ViSible=False End SubB．Private Sub Commandl_click() Command2．Enabl ed=True

[单选题]使用下图，表单名为Form1，表单中有两个命令按钮(Commandl和Command2)、两个标签、两个文本框(Text1和Text2)。如果在运行表单时，要使表单的标题显示“登录窗口”，则可以在Form1的Load事件中加入语句A．THISFORM．CAPTION=“登录窗口”B．FORM1．CAPTION=“登录窗口”C．THISFORM．NAME=“登录窗口”D．FORM1．NAME=“登录窗口”

[试题]在窗体上添加两个文本框(名为TXT1和TXT2)和一个命令按钮(名为BTNOK)，然后PRIVATE SUB BTNOK CLICK( )ME! TXT1="ABCD"ME! TXT2="123"ME! TXT1=ME! TXT2& ME! TXT1ME! TXT2=ME! TXT2+456E．ND SUB程序运行后，单击命令按钮，文本框TXT1和TXT2中显示的内容分别为[ ]和[ ]

[单选题]（ 23 ） 在已建窗体中有一命令按钮 （ 名为 Commandl ） ， 该按钮的单击事件对应的 VBA 代码为：Private Sub Commandl_Click()subT.Form.RecordSource = " select * from 雇员 "E．nd Sub单击该按钮实现的功能是A． ）使用 select 命令查找 “ 雇员 ” 表中的所有记录B． ）使用 select 命令查找并显示 “ 雇员 ” 表中的所有记录C． ）将 subT 窗体的数据来源设置为一个字符串D．