发布时间 : 星期三 文章access复习资料更新完毕开始阅读8dbc41054a7302768e993951
Access数据库应用技术
sir3的返回值是（ ）。
A hel B loworld C rld D hellowo 参考答案C
397 运行下面的程序段： For k＝5 to 10 Step 2 k＝k*2 Next k
则循环次数为（ ）。 A 1 B 2 C 3 D 5 参考答案A 398 程序段： x＝0
For i＝1 to 10 step 2 x＝x＋i i＝i*2 Next i
当循环结束后，变量i的值为（ ）。 A 22 B 10 C 11 D 16 参考答案A 402 程序段：
Str＝“计算机科学技术” Str＝Mid（str，3,2） Str的返回值是（ ）。
A 计算机科学 B 机科学技术 C 机科 D 科学 参考答案C
406 VBA中定义符号常量可以用关键字（ ）。 A Const B Dim C Public D Static 参考答案A 407 已知程序段: S＝0
For I=1 to 10 step 2 S=S+1 I=I*2 Next I
当循环结束后变量I,S的值分别为（ ）。 A 22,3 B 11,4 C 10,5 D 16,6 参考答案A
410 VBA中用实际参数a和 b调用有参函数过程 Area（m，n）的正确形式是（A Area m，n B Area a，b C Call Area（m,n） D Call Area a，b 参考答案B
414 VBA数据类型符号 “＆”表示的数据类型是（ ） A 整数 B 长整数 C 单精度数 D 双精度数 参考答案B
420 下列算式正确的是（ ）。 A Int（2.5）=3 B Int（2.5）=2 C Int（2.5）＝25 D Int（2.5）＝0.5 参考答案B
VBA数据库编程
31 在Access中，DAO的含义是
37
）。 Access数据库应用技术
A 开放数据库互连应用编程接口 B 数据库访问对象
C Active数据对象 D 数据库动态链接库 参考答案B 67 ADO 的含义是
A 开放数据库互连应用编程接口 B 数据库访问对象 C 动态链接库 D Active 数据对象 参考答案D
104 在窗体中有一个名称为run35的命令按钮，单击该按钮从键盘接收学生成绩，如果输入的成绩不在0到100分之间，则要求重新输入；如果输入的成绩正确，则进入后续程序处理。run35命令按钮的Click的事件代码如下： Private Sub run35_Click( ) Dim flag As Boolcan result=0 flag=True Do While flag
result=Val(InputBox(\请输入学生成绩:\输入\ If result>=0 And result <=100 Then ___________ Else
MsgBox \成绩输入错误，请重新输入\ End If Loop
Rem 成绩输入正确后的程序代码略 End Sub
程序中有一空白处，需要填入一条语句使程序完成其功能。下列选项中错误的语句是 A flag=False B flag=Not flag C flag=True D Exit Do 参考答案C
133 在VBA中要打开名为“学生信息录入”的窗体，应使用的语句是 A DoCmd.OpenForm “学生信息录入” B OpenForm “学生信息录入”
C DoCmd.OpenWindows “学生信息录入” D OpenWindows “学生信息录入” 参考答案A
139 在窗体中添加一个名称为Command1 的命令按钮，然后编写如下事件代码：
Public Function f (m As Integer)As Integer Do while m<>n Do While m>n m=m-n Loop Do While m
38
Access数据库应用技术
End Function
窗体打开运行后，单击命令按钮，则消息框的输出结果是 A 2 B 4 C 6 D 8 参考答案C
165 窗体中有3个命令按钮，分别命名为Command1、Command2和 Command3。当单击Command1按钮时，Command2按钮变为可用，Command3按钮变为不可见。下列Command1的单击事件过程中，正确的是 A private sub Command1_Click() Command2.Visible = true Command3.Visible = false B private sub Command1_Click() Command2.Enable = true Command3.Enable = false C private sub Command1_Click() Command2.Enable = true Command3.Visible = false D private sub Command1_Click() Command2.Visible = true Command3.Enable = false 参考答案C
174 下列过程的功能是：通过对象变量返回当前窗体的Recordset属性记录集引用，消息框中输出记录集的记录（即窗体记录源）个数。 Sub GetRecNum( ) Dim rs As Object Set rs = Me.Recordset MsgBox----- End Sub
程序空白处应填写的是 A Count B rs.Count C RecordCount D rs. RecordCount 参考答案D
201 能够实现从指定记录集里检索特定字段值的函数是 A Nz B Find C Lookup D DLookup 参考答案 D
209 下列程序段的功能是实现“学生”表中“年龄”字段值加1 Dim Str As String Str=\
Docmd.RunSQL Str
空白处应填入的程序代码是
A 年龄=年龄+1 B Update学生 Set 年龄=年龄+1 C Set 年龄=年龄+1 D Edit 学生 年龄=年龄+l 参考答案B
244 运行下列程序，输入数据8, 9, 3, 0后，窗体中显示结果是 Private Sub Form _click（） Dim sum AsInteger,m As Integer sum=0 Do
m=InputBox（“输入m”） sum=sum+m Loop Until m=0 MsgBox sum
39
Access数据库应用技术
End Sub
A 0 B 17 C 20 D 21 参考答案C
40