别再为不知怎么准备、怎么做计算机等级考试题库而担心啦！今天就跟着小编来一起看看二级Access试题，取得理想的成绩吧！
1.在窗体中有一个文本框Text1，编写事件代码如下：
Private Sub Form_Click()
X=val(Inputbox("输入x的值"))
Y=1
If X<>0 Then Y = 2
Text1.Value = Y
End Sub
打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是( )。答案：B
A）1
B）2
C）3
D）4
2.VBA“定时”操作中，需要设置窗体的“计时器间隔(TimerInterval)”属性值。其计量单位是( )。答案：B
A）微秒
B）毫秒
C）秒
D）分钟
3.下列过程的功能是：通过对象变量返回当前窗体的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
4.InputBox函数的返回值类型是( )。答案：D
A）数值
B）字符串
C）变体
D）数值或字符串(视输入的数据而定)
5.设有如下窗体单击事件过程：
Private Sub Form_Click()
a = 1
For i= 1 To 6
Select Case i
Case 1,3,5
a= a+1
Case 2,4,6
a = a+2
End Select
Next i
MsgBox a
End Sub
打开窗体运行后，单击窗体，则消息框的输出的结果是( )。答案：C
A）8
B）6
C）10
D）9
6.运行下列程序，输入数据8、9、3、0后，窗体中显示的结果是( )。
Private Sub Form_click()
Dim sum As Integer,m As Integer
sum=0
Do
m=InputBox("输入m")
sum=sum+m
Loop Until m=0
MsgBox sum
End Sub答案：C
A）0
B）17
C）20
D）21
7.在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码：
Private Sub Command1_Click()
s="ABBACDDCBA"
For I=6 To 2 Step －2
x=Mid(s,I,I)
y=Left(s,I)
z=Right(s,I)
z=x & y & z
Next I
MsgBox z
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是( )。答案：D
A）AABAAB
B）ABBABA
C）BABBA
D）BBABBA
8.下面编写了一个打开指定窗体的子过程OpenForms。代码如下：
Sub OpenForms(strFormName As String)
If strFormName=" " then
MsgBox"打开窗体名称不能为空！",VbCritical,"警告"
Exit Sub
End If
DoCmd.OpenForm strFormName
End Sub
如果此时需要调用该子过程打开名为“学生管理”的窗体，只需在主调过程合适的位置增添语句：
OpenForms("学生管理")
空白处应该填写的关键字是( )。答案：C
A）Open
B）OpenForm
C）Call
D）Function
9.运行下列程序，结果是( )。
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 "f = " & f
End Sub答案：D
A）f = 5
B）f = 7
C）f = 8
D）f = 13
10.在窗体中有一个命令按钮run35，对应的事件代码如下：
Private Sub run35_Enter( )
Dim num As Integer
Dim a As Integer
Dim b As Integer
Dim i As Integer
For i= 1 To 10
num = InputBox("请输入数据:", "输入",1)
If num Mod 2=0 Then
a = a + 1
Else
b = b + 1
End If
Next i
MsgBox("运行结果：a=" & Str(A)&",b=" & Str(B))
End Sub
运行以上事件所完成的功能是( )。答案：D
A）对输入的10个数据求累加和
B）对输入的10个数据求各自的余数，然后再进行累加
C）对输入的10个数据分别统计有几个是整数，有几个是非整数
D）对输入的10个数据分别统计有几个是奇数，有几个是偶数
刷完以上的二级Access试题了吗？
考无忧小编祝大家：
刷的计算机等级考试题库都考，考的都会，蒙的全对，考神附体，全部都过！预祝大家都能够顺利考取计算机等级证书。考无忧小编等大家的好消息！
文章推荐：
2018年全国计算机等级考试题库“二级MS Office 高级应用考试大纲”
全国计算机等级考试报考成功后可以退费吗？（内附计算机等级考试题库）
温馨提示：
考试想拿高分吗？更多计算机等级考试题库二级ms office试题请点击查看>>>二级ms office
想要了解更多的计算机等级考试题库请点击下载>>>计算机等级考试题库
想知道更多关于计算机等级考试题库的最新资讯吗？点击进入>>>计算机等级考试题库资讯
