⑧实现数据自动传输，可以自动地在各种数据格式之间导入或导出数据。⑨可以为窗体定制菜单，并可以让用户设计其中的内容。因此，选项B）错误。所以本题正确答案为D）。 20.若要执行指定的外部应用程序，应使用的宏操作是答案：C A）RunCommand B）RunSQL C）RunApp D）DoCmd
题目解析:在VBA中，使用RunApp函数来执行指定的外部应用程序，本题选择C）。 使用宏设计器可以创建操作序列宏、宏组以及条件操作宏，不能创建复合宏 GoToRecord命令可以在表、窗体或查询集中将指定的记录设置为当前记录 41.宏命令 FindRecord 的功能是答案：B A）指定控件查询条件刷新控件数据 B）查找满足指定条件的第一条记录 C）设置查询的筛选条件 D）指定记录为当前记录
题目解析:FindRecord的命令用于超找满足一定条件的第一条记录，B）正确。
考点11：VBA编程 8.运行下列程序，结果是
Private Sub Command32_Click() f0 = 1 : f1 = 1 : k = 1 Do While k <= 5 f = f0 + f1 f0 = f1 f1 = f k = k + 1 Loop
MsgBox \ End Sub答案：D A）f = 5 B）f = 7 C）f = 8 D）f = 13
题目解析:本题考查Do循环语句：
k=1时，f=1+1=2，f0=1，f1=2，k=1+1=2； k=2时，f=3，f0=2，f1=3，k=2+1=3； k=3时，f=5，f0=3，f1=5，k=3+1=4； k=4时，f=8，f0=5，f1=8，k=4+1=5；
k=5时，f=13，f0=8，f1=13，k=6，不再满足循环条件即跳出循环，此时f=13。故本题答案为D）。
考点12：VBA数据库编程
1.下列程序的功能是返回当前窗体的记录集 Sub GetRecNum()
Dim rs As Object Set rs = 【 】 MsgBox rs.RecordCount End Sub
为保证程序输出记录集(窗体记录源) 的记录数，括号内应填入的语句是答案：A A）Me.Recordset B）Me.RecordLocks C）Me.RecordSource D）Me.RecordSelectors
题目解析:程序中rs是对象变量，指代窗体对象，set语句是将当前窗体中的记录集对象赋给rs对象，Me表示当前窗体，用Me指明记录集来自于窗体，Recordset属性设置窗体、报表、列表框控件或组合框控件的记录源，用Me.Recordset代表指定窗体的记录源，即记录源来自于窗体。而RecordSourse属性用来设置数据源，格式为RecordSourse=数据源。因此题目空缺处应填Me.RecordSet，即A）选项正确。
2.下列过程的功能是：通过对象变量返回当前窗体的 Recordset 属性记录集引用，消息框中输出记录集的记录( 即窗体记录源) 个数。 Sub GetRecNum( ) Dim rs As Object Set rs = Me.Recordset MsgBox _____________ End Sub
程序括号内应填写的是答案：D A）Count B）rs.Count C）RecordCount D）rs.RecordCount
题目解析:题目中对象变量rs返回了当前窗体的RecordSet属性记录集的引用，那么通过访问对象变量rs的属性RecordCount就可以得到该记录集的记录个数，引用方法为rs.RecordCount。故本题答案为D）。
4.ADO 对象模型中可以打开并返回 RecordSet 对象的是答案：C A）只能是 Connection 对象 B）只能是 Command 对象
C）可以是 Connection 对象和 Command 对象 D）不存在
题目解析:Recordset对象只代表一个记录集，这个记录集是一个连接的数据库中的表或者是Command对象的执行结果返回的记录集。Connection对象用于建立与数据库的连接，通过连接可从应用程序访问数据源，因此，可以打开和返回RecordSet对象。Command对象在建立Connection后，可以发出命令操作数据源，因此，也可以打开并返回RecordSet对象。故本题答案为C）。
7.数据库中有表Emp，包括字段Eno、Ename、Eage、Esex、Edate和Eparty等。下面程序段的功能是：
在窗体文本框 tValue 中输入年龄条件，单击\删除\按钮，完成删除该年龄职工记录的操作。 Private Sub btnDelete_Click() Dim strSQL As String
strSQL = \
If IsNull(Me!tValue) = True Or IsNumeric(Me!tValue) = False Then MsgBox \年龄值为空或非有效数值！\ Me!tValue.SetFocus Else
strSQL = strSQL & \
If MsgBox(\确认删除?(Yes/No)\确认\ DoCmd.________________________ strSQL MsgBox \！\ End If End If End Sub
按照功能要求，下划线处应填写的是答案：B A）Execute B）RunSQL C）Run D）SQL
题目解析:Recordset对象只代表一个记录集，这个记录集是一个连接的数据库中的表或者是Command对象的执行结果返回的记录集。Connection对象用于建立与数据库的连接，通过连接可从应用程序访问数据源，因此，可以打开和返回RecordSet对象。Command对象在建立Connection后，可以发出命令操作数据源，因此，也可以打开并返回RecordSet对象。故本题答案为C）。
11.ADO 对象模型中有 5 个主要对象，他们是 Connection、Command、RecordSet、Error 和答案：C A）Database B）Workspace C）Field D）DBEngine
题目解析:ADO对象模型主要有5个对象，分别是Connection、Command、RecordSet、Field和Error，所以本题选择C）。