首页
微信群
QQ群

2013年9月全国计算机等级《二级VB》考前冲刺试卷一

如果您发现本试卷没有包含本套题的全部小题，请尝试在页面顶部本站内搜索框搜索相关题目，一般都能找到。

1: 在考生文件夹下有工程文件si5．vbp及窗体文件sj5．frm，该程序是不完整的。窗体Forml中有一命令按钮与一个水平滚动条。命令按钮的名称为Command1，标题为“移动”；水平滚动条的名称为HScroll1。单击“移动”按钮后，在弹出的对话框中输人数值。输入一个整数后，单击“移动”，滚动条中的滚动块移动到指定的刻度，如果超过了滚动条的最大刻度，则不再移动，并且在窗体上显示“输入的数值太大”，如果超过了滚动条的最小刻度，则不再移动，并且在窗体上显示“输入的数值太小”，如图1—5所示。
注意：请在有“?”的地方填入正确内容，然后删除“?”及代码前的所有注释符(即“¨’号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。

2: 在考生文件夹下有一个工程文件sj3．vbp，相应的窗体文件为sj3．{rm。其功能是在Text文本框中输入一个数N，单击命令按钮计算从0到N的所有素数的和，并在Text2中显示出来。运行程序如图7-3所示。
注意：去掉程序中的注释符“'”，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

3: 在考生文件夹下有工程文件sj4．vbp及窗体文件sj4．frm，在窗体上有一个名称为HScroll1的水平滚动条(Min为400，Max为2000)和三个名称分别为Command1、Com
mand2和Command3，标题分别为“减200”、“显示”和“加200”的命令按钮。程序运行后，如果单击“减200”命令按钮，则滚动块向左滚动200单位；如果单击“显示”命令按钮，则显示当前滚动条的值；如果单击“加200”命令按钮，则滚动块向右滚动200单位。程序运行时效果如图5-4昕示。
注意：请在有“?”的地方正确内容，然后删除“?”及代码前的所有注释符(即“”’号)，但不能修改其他部分。编写程序使程序运行时满足下列的条件。存盘时不得改变文件名和文件夹。

4: 在名称为Form1的窗体中绘制一个名称为Label1的标签，其标题为空，BorderStyle属性为1；再添加一个名称为Timer1的计时器。请设置适当的控件属性，并编写适当的事件过程，使得运行时，标签中的数字每隔1秒钟加2。程序运行效果如图1—1所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为Sj1．vbp，窗体文件名为Sj1．frm。

5: 在Form1的窗体上绘制一个命令按钮，名为Cmd1，标题为Display，按钮隐藏。编写适当的事件过程，使程序运行后，若单击窗体，则命令按钮出现；此时如果单击命令按钮，则在窗体上显示Visual Basic。程序运行情况如图3—2和图3-3所示。
注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为sj2．vbp，窗体文件名为sj2．frm。

6: 阅读程序：
Private Sub Form. Click（　）

a=0
For j=1 To 15
a=a+j Mod 3    Next j    Print a
End Sub    程序运行后，单击窗体，输出结果是（　）。
A.105
B.1
C.120
D.15

7: 下列可作为Visual Basic变量名的是（　　）。

A.A#A
B.4ABC
C.?xy
D.Print．Text

8: 同一概念在一处为实体而在另一处为属性或联系的冲突，在视图集成中称为（　　）。

A.命名冲突
B.概念冲突
C.域冲突
D.约束冲突

9: 把数学表达式表示为正确的VB表达式应该是（　　）。

A.(5x+3)／(2y-6)
B.x*5+3／2*y-6
C.(5*x+3)÷(2*y-6)
D.(x*5+3)／(y*2-6)

10: 以下关于KeyPress事件过程中参数KeyAscii的叙述正确的是（　　）。

A.KeyAscii参数是所按键的ASCII码
B.KeyAscii参数的数据类型为字符串
C.KeyAscli参数可以省略
D.KeyAscii参数是所按键上标注的字符

11: 有如下过程代码：
Sub var_dim（　　）
static numa As Integer
Dim numb As Integer
numa=numa+2．
numb=numb+1
print numa；mub
End Sub
连续3次调剧var_dim过程，第3次调用时的输出是（　　）。

A.2 1
B.2 3
C.6 1
D.6 3

12: 按照“后进先出”原则组织数据的数据结构是（　　）。

A.队列
B.栈
C.双向链表
D.二叉树

13: 在Visual Basic集成环境的设计模式下，用鼠标双击窗体上的某个控件打开的窗口是（　　）。

A.工程资源管理器窗口
B.属性窗口
C.工具箱窗口
D.代码窗口

14: 在窗体上画2个命令按钮，名称分别为Command1、Command2，然后编写下列事件过程。
Const n=5．m=4
Dim a(m，n)
Private Sub+Command1 Click（　　）
k=1
For i=1 To m
For j=1 To n

a(i，j)=k    k=k+1    Next j    Next i
End Sub    Private Sub Command2 Click（　　）    summ=0
For i=1 To m
For j=1 To n
If i=1 Or i=m Then    summ=summ+a(i，j)
Else
If j=1 Or j=n Then    summ=summ+a(i，j)
End If
End If    Next j    Next i    Print summ
End Sub    过程Command1_Click（　　）的作用是在二维数组a中存放1个m行n列的矩阵；过程Command2 Click（　　）的作用是（　　）。

15: 窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（　　）。

A.Private Sub Form1 Click（　　）
End Sub···
B.Private Sub Form1. Click（　　）
End Sub···
C.Private Sub Command1 click（　　）
End Sub···
D.Private Sub Command Click（　　）
End Sub···

16: 在窗体上画一个图片框，再在图片框中画一个命令按钮，位置如图所示，则命令按钮的Top属性值是（　　）。

A.200
B.300
C.500
D.700

17: 设工程中有2个窗体：Form1、Form2、Form1为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Form1的文本框Text1中输人口令并按回车键(回车键的

ASCII码为13)后，隐藏Form1，显示Form2。若口令为“Teacher”，所有菜单项都可见；否则看不到“成绩录入”菜单项。为此．某人在Form1窗体文件中编写如下程序：    Private Sub Text 1 KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
If Text1．Text="Teacher"Then
Form2．input．Visible=True
Else
Form2．input．Visible False
End If
End If
Forml．Hide
Form2．Show

18: 下列叙述中正确的是（　）。

A.栈是“先进先出”的线性表
B.队列是“先进后出”的线性表
C.循环队列是非线性结构
D.有序线性表既可以采用顺序存储结构，也可以采用链式存储结构

19: 假定已经在菜单编辑器中建立了窗体的弹出式菜单，其顶级菜单的名称为al，其“可见”属性为False。程序运行后，单击鼠标左键或右键都能弹出菜单的事件过程是（　　）。

A.Private Sub Form_MouseDown(Button As Integer，_Shift As Integer，X As Single，    Y As Single)
If Button=1 And Blltton=2Then    PopupMenu a1
End If
End Sub
B.Private Stlb Form_MouseDown(Button As Integer，_Shift As Integer，X As Single，    Y As Single)    PopupMenu a1
End Sub
C.Private Sub Form—MouseDown(Button As Integer，_Shift As Integer，X As Single，    Y As Single)
If Button=1 Then    PopupMenu a1
End If
End Sub

20: 为了使标签具有“透明”的显示效果，需要设置的属性是（　　）。

A.Caption
B.Alignment
C.BackStyle
D.AuwSize

21: 设菜单编辑器中各菜单项的属性设置如下表所示：
针对上述属性设置，以下叙述中错误的是（　　）。

A.属性设置有错，存在“标题”与“名称”重名现象
B.运行程序，序号为“3”的菜单项不显示
C.运行程序，序号为“4”的菜单项不可用
D.运行程序，序号为“5”的菜单项前显示“√”

22: 设窗体j．有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框：
Private Sub Command1=Click（　　）
CD1．DialogTitle="打开文件"
CD1．InitDir="C：＼"
CD1．Filter="所有文件|*．*| Word文档|*．doc|文本文件|*．txt" CD1．FileName=""
CD1．Action=1
If CD1．FileName=""Then
Print"未打开文件"
Else
Print"要打开文件"& CD1．FileName
End If
End Sub
但实际显示的对话框中列出了C．＼下的所有文件和文件夹，“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是（　　）。

A.把CD1．Action=1改为CD1．Action=2
B.把“CD1．Filter=”，后面字符串中的“所有文件”改为“文本文件”
C.在语句CD1．Action=1的前面添加：CD1．FilterIndex=3
D.把CD1．FileName=""改为CD1．FileName=”文本文件”

23: 设有如下程序：
Private Sub Form. Click（　　）
Dim s As Long，f As Long
Dim n As Integer，i As Integer
f=1
n=4
For i=1 To n
f=f*i
s=s+f
Next i
Print s
End Sub
程序运行后，单击窗体，输出结果是（　　）。

A.32
B.33
C.34
D.35

24: 以下关于函数过程的叙述中错误的是（　）。

A.函数过程一定有返回值
B.函数过程一定有参数
C.函数过程可以在窗体模块和标准模块中定义
D.函数过程参数的类型与返回值的类型无关

25: 下列操作不能向工程中添加窗体的是（　　）。

A.执行“工程”菜单中的“添加窗体”命令
B.单击工具栏中的“添加窗体”按钮．
C.右击窗体。在弹出的菜单中选择“添加窗体”命令
D.右击T程资源管理器，在弹出的菜单中选择“添加”命令，然后在下一级菜单中选择：“添加窗体”命令

26: 以下叙述中错误的是（　　）。

A.在KeyPress事件过程中不能识别键盘的按下与释放
B.在KeyPress事件过程中不能识别回车键
C.在KeyDown和KeyUp事件过程中，将键盘输入的“A”和“a”视作相同的字母
D.在KeyDown和KeyUp事件过程中，从大键盘上输出的“1”和从右侧小键盘上输入的“1”被视作不同的字符

27: 索引属于（　　）。

A.模式
B.内模式
C.外模式
D.概念模式

28: 已知a=5．b=8，c=12，下列表达式的值为True的是（　　）。

A.a>b And cB.a>b Or cC.a>b Xor cD.a>a Eqv c

29: 下列选项中不属于结构化程序设计原则的是（　　）。

A.可封装
B.自顶向下
C.模块化
D.逐步求精

30: 窗体上有一个名为Command1的命令按钮，并有如下程序：
Private Sub Corqmand1_Click（　　）
Dim a As Integer，b As Integer

a=8
b=12    Print Fun(a，b)；a；b
End Sub    Private Function Fun(ByVal a As Integer，b AS Integer)As Integer
a=a Mod 5
b=b＼5
Fun=a
End Function    程序运行时，单击命令按钮，则输出结果是（　　）。
A.3 3 2
B.3 8 2
C.8 8 12

31: 在设计阶段．当按Ctrl+R键时，所打开的窗口是（　　）。

A.代码窗口
B.工具箱窗口
C.工程资源管理器窗口
D.属性窗口

32: 在窗体上画一个名为Command1的命令按钮，然后编写以下程序：
Private Sub Command1 Click（　　）
Dim a(10)As Integer
Fork=10 To 1 Step-1

a(k)=20-2*k    Next k    k=k+7    Print a(k-a(k))
End Sub    运行程序，单击命令按钮，输出结果是（　　）。
A.18
B.12
C.8
D.6

33: 窗体上有一个名称为Command1的命令按钮，并有如下程序：
Private Sub Command1 Click（　　）
x=15
Do While x>0
x=x-3
x=IIf(Int(x／5)=x／5，x+2，x)
Loop
Print x
End Sub
程序运行后，单击命令按钮Command1，输出结果为（　　）。

A.0
B.-l
C.-2
D.-_3

34: 在VB集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，这个按钮是（　　）。

A.<img src="//img1.yqda.net/question-name/70/00029ea8a8930e193465feeb67fc87.jpg" alt="" />
B.<img src="//img1.yqda.net/question-name/68/9e382b02ed8fc0d09dea915da2254d.jpg" alt="" />
C.<img src="//img1.yqda.net/question-name/c6/13600e9eb6cd7d0d8edf569bba7ca2.jpg" alt="" />
D.<img src="//img1.yqda.net/question-name/d3/25fe7f1435182455660fa786329367.jpg" alt="" />

35: 以下叙述中错误的是（　　）。

A.一个工程中可以包含多个窗体文件
B.在一个窗体文件中用Private定义的通用过程能被其他窗体调用
C.在设计Visual Basic程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件
D.全局变量必须在标准模块中定义

36: 有三个关系R、S和T如下：
则由关系R和S得到关系T的操作是（　　）。

A.自然连接
B.差
C.交
D.并

37: 支持子程序调用的数据结构是（　）。

A.栈
B.树
C.队列
D.二叉树

38: 以下程序段的输出结果是（　　）。
x=1
y=4
Do Until y>4
x= x * y
y=y+1
Loop
Print X

A.1
B.4
C.8
D.20

39: 列表框中的项目保存在一个数组中，这个数组的名字是（　　）。

A.Column
B.Style
C.List
D.MultiSelect

40: 以下关予菜单设计的叙述中错误的是（　　）。

A.各菜单项可以构成控件数组
B.每个菜单项可以看成是一个控件
C.设计菜单时，菜单项的“有效”选，即有效，表示该菜单项不显示
D.菜单项只响应单击事件

41: 在学生管理的关系数据库中，存取一个学生信息的数据单位是（　　）。

A.文件
B.数据库
C.字段
D.记录

42: 设有以下函数过程
Private Function Fun(a（　　）As Integer，b As String)As Integer
…
End Function
若已有变量声明：
Dim x(5)As Integer，n As Integer，ch As String
则下面正确的过程调用语句是（　　）。

A.x(O)=Fun(x．"ch")
B.n=Fun(n．ch)
C.CallFun X，"ch"
D.n=Fun(x(5)，ch)

43: 窗体的左右两端各有1直线，名称分别为Line1、Line2；名称为Shape1的圆靠在左边的Linel直线上(见图)；另有1个名称为Timer1的计时器控件，其Enabled属性值是True。要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。为实现上述功能，某人把计时器的Interva1属性设置为1000，并编写了如下程序：
Private Sub Timer1 Timer（　　）
For k=Line1．X1 To Line2．X1 Step 100
If Shape1．Left+Shape1．width
Shape1．Left=Shape1．Left+100
End If
Next k
End Sub
运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是（　　）。

A.把计时器的Interval属性设置为1
B.把For k=line1．X1 To Line2．X1 Step 100和Next k两行删除
C.把For k=Line1．X1 To Line2．X1Step 100改为For k=Line2．X1 To Line1．X1 Step 100
D.把If Shape1．Left+Shepe1．Width<li>

44: 为丫从当前文件夹中读入文件File1．txt，某人编写了下面的程序：
Private Sub Command1_Click（　　）
Open"File1．txt"For Output As#20
Do While Not EOF(20)
Line Input#20，ch$
Print ch
Loop
Close#20
End Sub
程序调试时，发现有错误，下面的修改方案中正确的是（　　）。

A.在Open语句中的文件名前添加路径
B.把程序中各处的“20”改为“1”
C.把Print ch语句改为Print#20，ch
D.把Open语句中的0utput改为Input

45: 假定有一个菜单项，名为Menultem，为了在运行时使该菜单项不可见，应使用的语句为（　　）。

A.Menultem．Enabled=False
B.MenuItem．Enabled=True
C.MenuItem．Visible=True
D.Menultem．Visible=Flase

相关试卷

2017年全国计算机等级《二级VF》

所属类型：模拟考试2021-03-23

2017年计算机二级考试VF模拟试题

所属类型：模拟考试2021-03-23

2017年计算机二级考试VF模拟试题

所属类型：模拟考试2021-03-23

2017年计算机二级考试VF模拟试题

所属类型：模拟考试2021-03-23

2017年全国计算机二级考试题库1(

所属类型：模拟考试2021-03-23

2017年全国计算机二级考试题库2(

所属类型：模拟考试2021-03-23

2017年全国计算机二级考试题库3(

所属类型：模拟考试2021-03-23

2016年全国计算机等级考试《二级V

所属类型：模拟考试2021-03-23

2016年全国计算机等级考试《二级V

所属类型：模拟考试2021-03-23

2016年全国计算机等级考试《二级V

所属类型：模拟考试2021-03-23