2016年计算机二级考试题以及答案
(1)设有声明语句

Option Base 1
Dimb(-1 To 10, 2 To 9, 20)As Integer
则数组b中全部元素的个数
A)2310
B)1920
C)1500
D)1658
正确答案: B
(2)单击命令按钮,下列事件过程的执行结果为
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=40: y=72
Call PtoP(x, y)
Print x; y
End Sub
Public SubPtoP(Byval n As Integer, ByVal m As Integer)
n=n \ 10+2
m=m \10+2
End Sub
A)0 8
B)40 72
C)4 50
D)78 50
正确答案: B
(3)下列程序的执行结果为
Private Sub Command1_Click()
Dim p AsInteger, q As Integer
p=12: q=20
Call Value(p, q)
Print p;q
End Sub
Private Sub Value(ByVal m As Integer, ByVal n As Integer)
m=m * 2: n=n - 5
Print m; n
End Sub
A)20 12
20 15
B)12 20
12 25
C)24 15
12 20
D)24 12
12 15
考生答案: 正确答案: C
(4)在窗体上画一个命令按钮,然后编写如下程序:
Private SubCommand3_Click()
Cop 2
Cop 3
Cop 4
End Sub
Sub Cop (aAs Integer)
Static x As Integer
x=x + a
Print x;
EndSub
程序运行后,单击命令按钮,输出结果为
A)2 3 4
B)2 5 9
C)3 5 4
D)2 4 3
正确答案: B
(5)有如下事件过程,单击命令按钮扣,输出结果为
Private SubCommand1_Click()
Dim b%(1 To 4), j%, t#
For j=1 To 4
b(j)=j
Next j
t=Tax(b())
Print "t="; t,
End Sub
FunctionTax (a()As Integer)
Dim t#, i%
t=1
For i=2 To UBound(A)
t=t * a(i)
Next i
Tax=t
End Function
A)t=18
B)t=24
C)t=30
D)t=32
正确答案: B
(6)设在窗体上有一个文本框,然后编写如下的事件过程:
Private Sub Text1_KeyDown(KeyCode As Integer, ShiftAs Integer)
Const Alt=4
Const Key_F2=&H71
altdown%=(ShiftAnd Alt)》 0
f2down%=(KeyCode=Key_F2)
If altdown% And f2down%Then
Text1.Text="abl"
End If
EndSub
程序运行后,清除文本框中原有内容,如果按Shift+F2键,则在文本框中显示的是
A)Alt+F2
B)abl
C)随机出几个数
D)不发生变化
正确答案: D
(7)设已经在菜单编辑器中设计了窗体的快捷菜单,其顶级菜单为Bt,取消其"可见"属性,运行时,在以下事件过程中,可以使快捷菜单相应鼠标右键菜单的是
A)Private Sub Form_MouseDown(Button As Integer, Shift As Integer,_
X As Single, Y As Single)
If Button=2Then PopupMenu Bt, 2
End Sub
B)Private Sub Form_MouseDown(Button AsInteger, Shift As Integer,
X As Single, Y AsSingle) PopupMenu Bt
End Sub
C)Private SubForm_MouseDown(Button As Integer, Shift As Integer,_
X As Single, Y As Single)
PopupMenuBt,0
End Sub
D)Private Sub Form_MouseDown(Button As Integer, Shift AsInteger, _
X As Single, Y As Single)
If(Button=vbLeftButton)Or (Button=vbRightButton)Then PopupMenu Bt
End Sub
正确答案: A
(8)在窗体上画一个通用对话框,其Name属性为Cont,再画一个命令按钮,Name属性为Command1,然后编写如下事件过程:
Private SubCommand1_Click()
Cont.FileName=""
Cont.Flags=vbOFNFileMustExist
Cont.Filter="All Files|*.*"
Cont.FilterIndex=3
Cont.DialogTitle="Open File"
Co nt.Action=1
If Cont.FileName="" Then
MsgBox "No file selected"
Else
Open Cont.FileName For Input As #1
Do While Not EOF(1)
Input #1, b$
Print b$
Loop
End If
EndSub
以下各选项,对上述事件过程描述错误的是
A)该事件过程用来建立一个Open对话框,可以在这个对话框中选择要打开的文件
B)选择后单击"打开"按钮,所选择的文件名即作为对话框的FileName属性值
C)Open对话框不仅仅用来选择一个文件,还可以打开、显示文件
D)过程中的"Cont.Action=1"用来建立Open对话框,它与Cont.ShowOpen等价
正确答案: C
(9)已知使用Show方法的格式为:[窗体名称].Show [模式],如果要使窗体是"模态型"窗体,则"模式"值为
A)True
B)0
C)1
D)False
正确答案: C
(10)下面叙述不正确的是
A)对顺序文件中的数据操作只能按一定的顺序操作
B)顺序文件结构简单
C)能同时对顺序文件进行读写操作
D)顺序文件中只能知道第一个记录的位置
正确答案: C
【计算机二级考试题以及答案】相关文章:
计算机二级VB考试题及答案02-09
计算机二级《VFP》考试题及答案05-10
计算机二级MSoffice考试题及答案05-17
计算机二级Access考试题及答案03-02
职员培训考试题以及答案07-12
焊工培训考试题以及答案08-11
最新计算机二级VB考试题及答案04-17
计算机二级《Access》备考试题与答案12-27