3月全国计算机等级考试二级VB考试真题（2）
2012年3月全国计算机等级考试二级VB考试真题
Dim a(10) As Integer
……
Call p(a)
如下过程定义中，正确的是( )。
A. Private Sub p(a As Integer)
B. Private Sub p(a() As Integer)
C. Private Sub p(a(10) As Integer)
D. Private Sub p(a(n) As Integer)
(27)若要获得组合框中输入的数据，可使用的属性是( )。
A.Listindex
B.Caption
C.Text
D.List
(28)在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”， 如图所示。
现有如下事件过程： Private Sub Text1_Change()
Text2.Text=Mid(Text1,1,1)
End Sub
运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是：( )。
A. DataA
B. DataB
C. aData
D. aBase
(29)有如下程序：
Option Base !
Private Sub Command1_Click()
Dim arr(10)
arr=Array(10,35,28,90,54,68,72,90)
For Each a In arr
If a>50 Then
Sum=Sun+a
End If
Next a
End Sub
运行上述程序时出现错误，错误之处是( )。北京有40个小区处于封闭管控
A. 数组定义语句不对，应改为Dim arr
B. 没有指明For循环的终值
C. 应在For语句之前增加Sum=0
D. Next a应改为Next
(30)要求产生10个随机整数，存放在数组arr中，从键盘输入要删除的数组元素的下标，将该元素中的数组删除，后面元素中的数据依次前移，并显示删除后剩余的数据，现有如下
程序：
Option Base 1
Private Sub Command1_Click()
Dim arr(10) AS Integer
For i=1 to 10
arr(i)=int (Rnd*100)
Print arr(i);
Next
x=inputbox(“输入1到10的一个整数：”)
For i=x+1 to 10 ‘循环2
arr(i-1)=arr(i)
Next
For i=1 to 10 ‘循环3
Print arr(i);
Next
End Sub
二级VB程序运行后发现显示的结果不正确，应该进行的修改是( )。
A. 产生随机数时不使用Int函数
B. 循环2的初始值应为i=x
C. 数组定义改为Dim a(11) as integer
D. 循环3是循环终值应改为9
(31)使用驱动器列表框Drive1、目录列表框Fiel1时，需要设置控件的同步，以下能够正确设置两个同步的命令是( )。
A.Dir1.path=Drive.pate
B.File1.path=Dir1.pate
C.File1.path=Drive1.pate
D.Drive1.Drive=Dir1.pate
(32) 以下关于弹出式菜单的叙述中，错误的是( )。
A.一个窗体只能有一个弹出式菜单
B.弹出式菜单在菜单编辑器中建立
C.弹出式菜单的菜单名(主菜单项)的“可见”属性通常设置为False
D.弹出式菜单通过窗体的PopupMenu方法显示
(33)有如下程序：
Private Type stu
牛年带牛字祝福语X As String
Y As Integer
End Type
Private Sub Command1_Click()
Dim a As stu使徒行者谁是黑警
a.x=”ABCD”
a.y=12345
Print a
End Sub\
程序运行时出现错误，错误的原因是( )。
山东限电A. Type定义语句没有放在标准模块中
B. 变量声明语句有错
C. 赋值语句不对
D. 输出语句Print不对
(34)在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Lable1的标签。窗体外观如图a所示。要求当改变任一个文本框的内容，就会将该文本框的内容显示在标签中，如图b所示。实现上述功能如下：
Pivate Sub Text1_Change()
Call ShowText(Text1)
End Sub
Private Sub Text2 Change()
Call ShowText(Text2)
End Sub
private Sub showText(T As TextBox)
Label1.Caption=”文本框中的内容是：”&T.Text
Enb Sub
关于上述程序，以下叙述中错误的是( )。
A. ShowText过程的参数类型可以是Control
B. ShowText过程的参数类型可以是Variant
C. 两个过程调用语句有错，应分别改为Call ShowText(Text1.Text)、CallShowText(Text2.Text)
D. ShowText过程中的T是控件变量
(35)设有打开文件的语句如下：
Open“test.dat” For Random As #1
要求把变量a中的数据保存到该文件中，应该使用的语句是( )。
A. Inpur #1，a
相逢何必曾相识B. Write #1.a
C. Put #1，.a
D. Get #1..a
二、 填空题(每空2分，共30分)请将每空的正确答案写在答题卡【1】~【15】序号的横线上，答在试卷上不得分。
(1) 在长度为n的顺序存储的线性表中删除一个元素，最坏情况下需要移动表中的元素个数
为 ( )。
(2)设循环队列的存储空间为Q(1：30)，初始状态为Front=rear=30.现经过一系列入队与退队运算后，front=16，rear=15，则循环队列中有( )个元素。
(3)数据库管理系统提供的数据语言中，负责数据的增、删、改和查询的是( )。
发布评论