在对话框中单击“应用”按钮则（)。A．关闭对话框B．开启新对话框C．执行当前内容，但不关闭对话框D．

在“插入表格”对话框中，单击“向导”按钮，则弹出( )，可以引导用户一步步创建表格。

阅读如下程序； Private Sub Form. Click() msg1$=“继续吗？” msg2$=“操作对话框” r=MsgBox(msg1$，vbYesNo OrvbDefaultButton2，msg2$) End Sub 程序运行后，单击窗体，将产生一个信息框。此时如果直接按回车键，则相当于用鼠标单击信息框中的【 】按钮。

()

A．OK按钮

B．Delete按钮

C．Cancel按钮

D．Insert按钮

话框可用于保存文本文件(默认)和可执行文件(．exe)，然后在文本控件中显示保存的文件名。 Private Sub Command1_Click() CommonDialog1．Filter=【 】 CommonDialog1．FilterIndex=【 】 CommonDialog1．ShowSave Info．Text=【 】 End Sub

备份文档，操作方法如下：

(1)单击“MYFILE1”窗口，将其置为当前活动窗口。

(2)单击______→______，显示“另存为”对话框。

(3)在文件名框中输入文档名，如“FILE”，单击______按钮，将文档取另外的名字保存备份。

，单击______并指定要计算的数据区域，单击“编辑”工具栏中的______按钮，计算结果即填入指定的单元格中。

在窗体上画一个命令按钮Command1，然后编写如下程序： Private Sub Command1_Click() Dim arr()As Integer ReDim arr(3) For i=0 To 3 arr(i)=i Next i x=InputBox("请输入一个数字：") If Val(x)＞4 Then ReDim art(4) air(4)=x End If Me.Print(arr(4)-art(3)) End Sub 程序运行后，单击命令按钮，在输入对话框中输入12，输出结果为【 】。

编写如下通用过程： Sub proc(By Val num As Long，ByRef ren As Long) Dim k As Long K = 1 num=Abs(num) Do While num k= k *(num Mod 10) num=num\ 10 Loop ren=k End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1 Click() Dim n As Long， r As Long n=InputBox("请输入一个整数") n = CLng(n) proc n，r Print r End Sub 程序运行后，单击命令按钮，在输入对话框中输入345，输出结果是【 】。

在考生文件夹中，打开Ecommerce数据库，完成如下综合应用(所有控件的属性必须在表单设计器的属性窗口中设置)： 设计一个文件名和表单名均为myform2的表单，表单标题为“客户基本信息”。 要求该表单上有“女客户信息”(Command1)、“输出客户信息”(Command2)、和“退出”(Command4)三个命令按钮。 各命令按钮功能如下： (1)单击“女客户信息”按钮，使用SQL的SELECT命令查询客户表Customer中“女客户”的全部信息。 (2)单击“输出客户信息”按钮，调用考生文件夹中的报表文件myreport在屏幕上预览(PREVIEW)客户信息。 (3)单击“退出”按钮，关闭表单。

在考生文件夹中完成如下综合应用： 在考生文件夹中设计名为Supper的表单(表单的控件名和文件名均为Supper)，表单的标题为“机器零件供应情况”。表单中有一个表格控件和两个命令按钮“查询”和“关闭”。 运行表单时单击“查询”命令按钮后，表格控件中显示“供应”表工程号为“A7”所使用的零件的“零件名”、“颜色”、和“重量”，并将结果放到表CI中。 单击“关闭”按钮关闭表单。

应”表建立如下表单： 设计名为projectsupply的表单(表单控件名和文件名均为projectsupply)。表单的标题为“工程用零件情况浏览”，界面如图所示。

表单中有一个表格控件和两个命令按钮“查询”和“退出”。运行表单时，单击“查询”命令按钮后，表格控件中显示了工程号“J1”所使用的零件的零件名、颜色和重量。 单击“退出”按钮关闭表单。