2016年9月全国计算机等级考试二级笔试试卷VB语言程序设计
一、选择题
1,下列叙述中正确的是
A,算法就是程序B,设计算法时只需要考虑数据结构的设计
C,设计算法时只需要考虑结果的可靠性D,以上三种说法都不对
2,下列关于线性链表的叙述中,正确的是
A,各数据结点存储空间可以不连续,但它们的存储顺序与逻辑顺序必须一致
B,各数据结点的存储顺序可以不一致,但它们的存储空间必须连续
C,进行插入与删除时,不需要移动表中的元素D,以上三种说法都不对
3,下列关于二叉树的叙述中,正确的是
A,叶子结点总是比度为2的结点少一个
B,叶子结点总是比度为2的结点多一个
C,叶子结点数是度为2的结点数的两倍
D,度为2的结点数是度为1的结点数的两倍
4,软件按功能可以分为应用软件,系统软件和支撑软件(或工具软件).下面属于应用软件的是().
A,学生成绩管理系统B,C语言编译程序
C,UNIX操作系统D,数据库管理系统
5,某系统总体结构图如下图所示
该系统总体结构图的深度是
A,7B,6C,3D,2
6,程序调试的任务是
A,设计测试用例B,验证程序的正确性
C,发现程序中的错误D,诊断和改正程序的错误
7,下列关于数据库设计的叙述中,正确的是
A,在需求分析阶段建立数据字典B,在概念设计阶段建立数据字典C,在逻辑设计阶段建立数据字典D,在物理设计阶段建立数据字典
8,数据库系统的模式不包括
A,概念模式B,内模式C,外模式D,数据模式
9,有三个关系R,S和T如下:
R
A
B
C
a
1
2
b
2
1
c
3
1
S
A
B
C
a
1
2
b
2
1
T
A
B
C
c
3
1
则由关系R和S得到关系T的操作是
A,自然连接B,差C,交D,并
10,下列选项中属于面向对象设计方法主要特征的是
A,继承B,自顶向下C,模块化D,逐步求精
11,以下描述中错误的是
A,窗体的标题通过其Caption属性设置
B,窗体的名称(Name属性)可以在运行期间修改
C,窗体的背景图形通过其Picture属性设置
D,窗体最小化时的图标通过其Icon属性设置
12,在设计阶段,当按Ctrl+R键时,所打开的窗口是
A,代码窗口B,工具箱窗口C,工程资源管理器窗口D,属性窗口
13,设有如下变量声明语句:
Dima,basBoolean则下列叙述中正确的是().
A,a和b都是布尔型变量B,a是变体型变量,b是布尔型变量C,a是整型变量,b是布尔型变量D,a和b都是变体型变量
14,下列可作为VisualBasic变量名的是().
A,A#AB,4ABCC,xyD,Print_Text
15,假定一个滚动条的LargeChange属性值为100,则100表示().
A,单击滚动条箭头和滚动框之间某位置时滚动框位置的变化量
B,滚动框位置的最大值C,拖动滚动框时滚动框位置的变化量
D,单击滚动条箭头时滚动框位置的变化量
16,在窗体上画一个命令按钮,然后编写如下事件过程:
PricateSubCommand1_Click()
MsgBoxStr(123+321)
EndSub程序运行后,单击命令按钮,则在信息框中显示的提示信息为().
A,字符串"123+321"B,字符串"444"C,数值"444"D,空白
17,假定有以下程序
PricateSubForm_Click()
a等于1:b等于a
DoUntila>,等于5
x等于a*b
Printb,x
a等于a+b
b等于b+a
Loop
EndSub程序运行后,单击窗体,输出结果是().
A,11B,11C,11D,11
23243836
18,在窗体上画一个名称为List1的列表框,列表框中显示若干城市的名称.当单击列表框中的某个城市名时,该城市名消失.下列在List1_Click事件过程中能正确实现上述功能的语句是().
A,List1.RemoveItemList1.TextB,List1.RemoveItemList1.Clear
C,List1.RemoveItemList1.ListCountD,List1.RemoveItemList1.ListIndex
19,列表框中的项目保存在一个数组中,这个数组的名字是().
A,ColumnB,StyleC,ListD,MultiSelect
20,有人编写了如下程序:
PrivateSubForm_Click()
DimsAsInteger,xAsInteger
s等于0
x等于0
DoWhiles等于10000
x等于x+1
s等于s+x^2
Loop
Prints
EndSub上述程序的功能是:计算s等于1+22+32等+n2+等,直到s>,10000为止.程序运行后,发现得不到正确的结果,必须进行修改.下列修改中正确的是().
A,把x等于0改为x等于1B,把DoWhiles等于10000改为DoWhiles<,等于10000
C,把DoWhiles等于10000改为DoWhiles>,10000
D,交换x等于x+1和s等于s+x^2的位置
21,设有如下程序:
PrivateSubForm_Click()
DimsAsLong,fAsLong
DimnAsInteger,iAsInteger
f等于1
n等于4
Fori等于1Ton
f等于f*i
s等于s+f
Nexti
Prints
EndSub程序运行后,单击窗体,输出结果是
A,32B,33C,34D,35
22,阅读下面的程序段:
a等于0
Fori等于1To3
Forj等于1Toi
Fork等于jTo3
a等于a+1
Nextk
Nextj
Nexti执行上面的程序段后,a的值为().
A,3B,9C,14D,21
23,设有如下程序:
PrivateSubForm_Click()
Cls
a$等于"123456"
Fori等于1To6
PrintTab(12-i),________
Nexti
EndSub程序运行后,单击窗体,要求结果如图所示,则在_________处应填入的内容为().
A,Left(a$,i)B,Mid(a$,8-I,i)C,Right(a$,i)D,Mid(a$,7,i)
24,设有如下程序:
PrivateSubForm_Click()
DimiAsInteger,xAsString,yAsString
x等于"ABCDEFG"
Fori等于4To1Steo-1
y等于Mid(x,i,i)+y
Nexti
Printy
EndSub程序运行后,单击窗体,输出结果为().
A,ABCCDEDEFGB,AABBCDEFG
C,ABCDEFGD,AABBCCDDEEFFGG
25,设有如下程序:
PrivateSubForm_Click()
Dimary(1To5)AsInteger
DimiAsInteger
DimsumAsInteger
Fori等于1To5
ary(i)等于i+1
sum等于sum+ary(i)
Nexti
Printsum
EndSub程序运行后,单击窗体,输出结果为().
A,15B,16C,20D,25
26,有一个数列,它的前3个数为0,1,1,此后的每个数都是其前面3个数之和,即0,1,1,2,4,7,13,24,等要求编写程序输出该数列中所有不超过1000的数.
PrivateSubForm_Click()
DimiAsInteger,aAsInteger,bAsInteger
DimcAsInteger,dAsInteger
a等于0:b等于1:c等于1
d等于a+b+c
i等于5
Whiled<,等于1000
Printd,
a等于b:b等于c:c等于d
d等于a+b+d
i等于i+1
Wend
EndSub运行上面的程序,发现输出的数列不完整,应进行修改.以下正确的修改是
A,把Whiled<,等于1000改为Whiled>,1000B,把i等于5改为i等于4
C,把i等于i+1移到Whiled<,等于1000的下面
D,在i等于5的上面增加一个语句:Printa,b,c
27,下面的语句用Array函数为数组变量a的各元素赋整数值:a等于Array(1,2,3,4,5,6,7,8,9)针对a的声明语句应该是().
A,DimaB,DimaAsIntegerC,Dima(9)AsIntegerD,Dima()AsInteger
28,下列描述中正确的是().
A,VisualBasic只能通过过程调用执行通用过程B,可以在Sub过程的代码中包含另一个Sub过程的代码C,可以像通用过程一样指定事件过程的名字D,Sub过程和Function过程都有返回值
28,阅读程序: ;
Functionfac(ByValnAsInteger)AsInteger
DimtempAsInteger
temp等于1
Fori%等于1Ton
temp等于temp*i%
Nexti%
fac等于temp
EndFunction
PrivateSubForm_Click()
DimnsumAsInteger
nsum等于1
Fori%等于2To4
nsum等于nsum+fac(i%)
Nexti%
Printnsum
EndSub程序运行后,单击窗体,输出结果是().
A,35B,31C,33D,37
30,在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下代码:
SubS(xAsInteger,yAsInteger)
StaticzAsInteger
y等于x*x+z
z等于y
EndSub
PrivateSubCommand1_Click()
DimiAsInteger,zAsInteger
m等于0
z等于0
Fori等于1To3
Si,z
m等于m+z
Nexti
Label1.Caption等于Str(m)
EndSub程序运行后,单击命令按钮,在标签中显示的内容是().
A,50B,20C,14D,7
31,以下说法中正确的是().
A,MouseUp事件是鼠标向上移动时触发的事件
B,MouseUp事件过程中的x,y参数用于修改鼠标位置
C,在MouseUp事件过程中可以判断用户是否使用了组合键
D,在MouseUp事件过程中不能判断鼠标的位置
32,假定已经在菜单编辑器中建立了窗体的弹出式菜单,其顶级菜单项的名称为a1,其"可见"属性为False.程序运行后,单击鼠标左键或右键都能弹出菜单的事件过程是().
A,PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
IfButton等于1AndButton等于2Then
PopupMenua1
EndIf
EndSub
B,PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
PopupMenua1
EndSub
C,PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
IfButton等于1Then
PopupMenua1
EndIf
EndSub
D,PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
IfButton等于2Then
PopupMenua1
EndIf
EndSub
33,在窗体上画一个名称为CD1的通用对话框,并有如下程序:
PrivateSubForm_Load()
CD1.DefaultExt等于"doc"
CD1.FileName等于"c:\file1.txt"
CD1.Filter等于"应用程序(*.exe)|*.exe"
EndSub程序运行时,如果显示了"打开"对话框,在"文件类型"下拉列表中的默认文件类型是().
A,应用程序(*.exe)B,*.docC,*,txtD,不确定
34,以下描述中错误的是().
A,在多窗体应用程序中,可以有多个当前窗体B,多窗体应用程序的启动窗体可以在设计设定
C,多窗体应用程序中每个窗体作为一个磁盘文件保存D,多窗体应用程序可以编译生成一个EXE文件
35,以下关于顺序文件的叙述中,正确的是().
A,可以用不同的文件号以不同的读写方式同时打开一个文件B,文件中各记录的写入顺序与读出顺序是一致的
C,可以用Input#或LineInput#语句向文件写记录D,如果用Append方式打开文件,则既可以在文件末尾添加记录,也可以读取原有记录
二、填空题(每空2分,共30分)
1,数据结构分为线性结构和非线性结构,带链的栈属于___【1】______.
2,在长度为n的顺序存储的线性表中插入一个元素,最坏情况下需要移动表中____【2】___个元素.
3,常见的软件开发方法有结构化方法和面向对象方法.对某应用系统经过需求分析建立数据流图(DFD),则应采用___【3】_____方法.
4,数据库系统的核心是__【4】______.
5,在进行关系数据库的逻辑设计时,E-R图中的属性常被转换为关系中的属性,联系通常转换为___【5】___.
6,为了使标签能自动调整大小以显示标题(Caption属性)的全部文本内容,应把该标签的__【6】___属性设置为True.
7,在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
PrivateSubCommand1_Click()
x等于1
Result等于1
Whilex<,等于10
Result等于__【7】__
x等于x+1
Wend
PrintResult
EndSub上述事件过程用来计算10的阶乘.请填空.
8,在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
PrivateSubCommand1_Click()
t等于0:m等于1:Sum等于0
Do
t等于t+【8】
Sum等于Sum+【9】
m等于m+2
LoopWhile【10】
PrintSum
EndSub该程序的功能是,单机命令按钮,则计算并输出以下表达式的值:1+(1+3)+(1+3+5)+等+(1+3+5+等39),请填空.
(9)在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
PrivateSubCommand1_Click()
DimM(10)AsInteger
Fork等于1to10
M(k)等于12-k
Next
x等于6
PrintM(2+M(x))
EndSub程序运行后,单击命令按钮,输出结果是【11】
(10)在窗体上画一个命令按钮,(其Name属性为Command1),然后编写如下代码:
PrivateSubCommand1_Click()
DimnAsInteger
n等于Val(Inputbox("请输入一个整数:"))
IfnMod3等于0AndnMod2等于0AndnMod5等于0Then
Printn+10
EndIf
EndSub程序运行后,单击命令按钮,在输入对话框中输入60,则输出结果是【12】.
(11)在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
PrivateSubCommand1_Click()
DimctAsString
DimntAsInteger
Open"c:\stud.txt"【13】
DoWhileTrue
ct等于Inputbox("请输入姓名:")
Ifct等于【14】ThenExitDo
nt等于Val(Inputbox("请输入总分:"))
Write#1,【15】
Loop
Close#1
EndSub以上程序的功能是,程序运行后,单击命令按钮,则向c盘根目录下的文件stud.txt中添加记录(保留已有记录),添加的记录由键盘输入,如果输入"end",则结束输入.每条记录包含姓名(字符串型)和总分(整型)两个数据.请填空.
2016年9月17日全国计算机等级考试二级VB考试笔试题标准答案
一、选择题
1,D2,C3,B4,A5,C6,D7,C8,D9,B10,A
11,B12,C13,B14,D15,A16,B17,D18,D19,C
20,B21,B22,C23,A24,A25,C26,D27,A28,A
29,C30,B31,C32,B33,A34,A35,B
填空题1,线性结构
2,n
3,结构化
4,数据库管理系统
5,关系
6,Autosize
7,Result*x
8,m
9,t
10,m<,等于39或者m<,40或者m<,41
11,4
12,70
13,forappendas#1
14,"end"
15,ct,nt
更多vb语言在线真题qcks./SecondGradePage.aspxID等于82
功能3
功能2
功能1
XY系统
功能2.1
功能2.2
功能2.3