全国计算机等级考试二级VB语言笔试试题及答案Word格式.docx
《全国计算机等级考试二级VB语言笔试试题及答案Word格式.docx》由会员分享,可在线阅读,更多相关《全国计算机等级考试二级VB语言笔试试题及答案Word格式.docx(29页珍藏版)》请在冰豆网上搜索。
A.PDL(过程设计语言)
B.PAD图
C.N-S图D.DFD图
(7)下列叙述中正确的是
A.软件交付使用后还需要进行维护
B.软件一旦交付使用就不需要再进行维护
C.软件交付使用后其生命周期就结束
D.软件维护是指修复程序中被破坏的指令
(8)数据库设计的根本目标是要解决
A.数据共享问题
B.数据安全问题
C.大量数据存储问题D.简化数据维护
(9)设有如下关系表:
R
S
T
B
1
2
3
则下列操作中正确的是B。
A.T=R∩SB.T=R∪SC.T=R×
SD.T=R/S
(10)数据库系统的核心是B。
A.数据模型B.数据库管理系统C.数据库D.数据库管理员
(11)假定一个VisualBasic应用程序由一个窗体模块和一个标准模块构成。
为了保存该应
用程序,以下正确的操作是B。
A.只保存窗体模块文件B.分别保存窗体模块、标准模块和工程文件
C.只保存窗体模块和标准模块文件D.只保存工程文件
(12)为了清除窗体上的一个控件,下列正确的操作是C。
A.按回车键
B.按Esc键
C.选择(单击)要清除的控件,然后按Del键
D.选择(单击)要清除的控件,然后按回车键
(13)以下叙述中错误的是C。
A.打开一个工程文件时,系统自动装入与该工程有关的窗体、标准模块等文件
B.当程序运行时,双击一个窗体,则触发该窗体的DblClick事件
C.VisualBasic应用程序只能以解释方式执行
D.事件可以由用户引发,也可以由系统引发
(14)设a=2,b=3,c=4,d=5,下列表达式的值是D。
Nota<
=cOr4*c=b^2Andb<
>
a+c
A.-1B.1C.TrueD.False
(15)设a=5,b=10,则执行c=Int((b-a)*Rnd+a)+1后,c值的范围为C。
A.5~10B.6~9C.6~10D.5~9
(16)在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
PrivateSubCommand1_Click()
a$="
softwareandhardware"
b$=Right(a$,8)
c$=Mid(a$,1,8)
MsgBoxa$,b$,c$,1
EndSub
运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是
A.softwareandhardware
B.software
C.hardware
D.-1
(17)在窗体上画一个命令按钮和一个文本框,其名称分别为
Command1
和
Text1,把文本
框的Text属性设置为空白,然后编写如下事件过程:
a=InputBox("
Enteraninteger"
)
b=InputBox("
Text1.Text=b+a
程序运行后,单击命令按钮,如果在输入对话框中分别输入容是A。
8和
10,则文本框中显示的内
A.108
B.18
C.810
D.出错
(18)在窗体上画两个文本框,其名称分别为
Text1和
Text2,然后编写如下程序:
PrivateSubForm_Load()
Show
Text1.Text="
"
Text2.Text="
Text1.SetFocus
PrivateSubText1_Change()
Text2.Text=Mid(Text1.Text,8)
程序运行后,如果在文本框Text1中输入BeijingChina,则在文本框Text2中显示的内容是
B。
A.BeijingChinaB.ChinaC.BeijingD.BeijingC
(19)在窗体上画一个列表框和一个命令按钮,其名称分别为
List1
Command1,然后编
写如下事件过程:
List1.AddItem"
Item1"
Item2"
Item3"
List1.List(List1.ListCount)="
AAAA"
程序运行后,单击命令按钮,其结果为
A.把字符串“AAAA”添加到列表框中,但位置不能确定
B.把字符串“AAAA”添加到列表框的最后(即“Item3”的后面)
C.把列表框中原有的最后一项改为“AAAA”
D.把字符串“AAAA”插入到列表框的最前面(即“Item1”的前面)
(20)假定有如下事件过程:
PrivateSubForm_Click()
DimxAsInteger,nAsInteger
x=1
n=0
DoWhilex<
28
x=x*3
n=n+1
Loop
Printx,n
程序运行后,单击窗体,输出结果是A。
A.814B.563C.281D.2435
(21)有如下程序:
DimCheck,Counter
Check=True
Counter=0
Do
DoWhileCounter<
20
Counter=Counter+1
IfCounter=10Then
Check=False
ExitDo
EndIf
LoopUntilCheck=False
PrintCounter,Check
程序运行后,单击窗体,输出结果为D。
A.150B.20-1C.10TrueD.10False
(22)有如下程序:
DimiAsInteger,sumAsInteger
sum=0
Fori=2To10
IfiMod2<
0AndiMod3=0Then
sum=sum+i
Nexti
Printsum
4
程序运行后,单击窗体,输出结果为
A.12
B.30
C.24
D.18
(23)在窗体上画一个名称为
Text1
的文本框和一个名称为
的命令按钮,然后编
Dimarray1(10,10)AsInteger
DimiAsInteger,jAsInteger
Fori=1To3
Forj=2To4
array1(i,j)=i+j
Nextj
Text1.Text=array1(2,3)+array1(3,4)
程序运行后,单击命令按钮,在文本框中显示的值是
B.13
C.14
D.15
(24)在窗体上画一个命令按钮,其名称为
Command1,然后编写如下事件过程:
Dima1(4,4),a2(4,4)
Fori=1To4
Forj=1To4
a1(i,j)=i+j
a2(i,j)=a1(i,j)+i+j
Printa1(3,3);
a2(3,3)
程序运行后,单击命令按钮,在窗体上输出的是
A.6
6
B.10
5
C.7
21
D.6
12
(25)有如下程序:
OptionBase1
Dimarr,Sum
Sum=0
arr=Array(1,3,5,7,9,11,13,15,17,19)
Fori=1To10
Ifarr(i)/3=arr(i)\3Then
Sum=Sum+arr(i)
PrintSum
程序运行后,单击窗体,输出结果为C。
A.25B.26C.27D.28
(26)在窗体上画一个命令按钮,然后编写如下事件过程:
Dima(5)AsString
Fori=1To5
a(i)=Chr(Asc("
A"
)+(i-1))
ForEachbIna
Printb;
Next
程序运行后,单击命令按钮,输出结果是A。
A.ABCDEB.12345C.abcdeD.出错信息
(27)以下关于函数过程的叙述中,正确的是D。
A.如果不指明函数过程参数的类型,则该参数没有数据类型
B.函数过程的返回值可以有多个
C.当数组作为函数过程的参数时,既能以传值方式传递,也能以引用方式传递D.函数过程形参的类型与函数返回值的类型没有关系
(28)函数过程F1的功能是:
如果参数b为奇数,则返回值为1,否则返回值为0。
以下
能正确实现上述功能的代码是B。
A.FunctionF1(bAsInteger)
IfbMod2=0Then
Return0
Else
Return1
EndFunction
B.FunctionF1(bAsInteger)
F1=0
F1=1
C.FunctionF1(bAsInteger)
D.FunctionF1(bAsInteger)
IfbMod2<
0Then
(29)以下关于
KeyPress事件过程中参数
KeyAscii
的叙述中正确的是
A.KeyAsciiC.KeyAscii
参数是所按键的参数可以省略
ASCII
码
B.KeyAsciiD.KeyAscii
参数的数据类型为字符串参数是所按键上标注的字符
(30)设窗体上有一个名为Text1的文本框,并编写如下程序:
PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
Print"
程序设计"
PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)
VisualBasic"
;
程序运行后,如果在文本框中输入字母“a”,然后单击窗体,则在窗体上显示的内容是
A.VisualBasicB.程序设计C.VisualBasic程序设计D.a程序设计
(31)假定有下表所列的菜单结构:
━━━━━━━━━━━━━━━━━━━━
名称层次
────────────────────
appear1(主菜单)
bigicon2(子菜单)
smallicon2(子菜单)
要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。
以下正确的
事件过程是C。
A.PrivateSubbigicon_Click()
bigicon.Checked=False
B.PrivateSubbigicon_Click()
Me.appear.bigicon.Checked=True
C.PrivateSubbigicon_Click()
bigicon.Checked=True
D.PrivateSubbigicon_Click()
appear.bigicon.Checked=True
(32)假定通用对话框的名称为CommonDialog1,命令按钮的名称为Command1,则单击
命令按钮后,能使打开的对话框的标题为“NewTitle”的事件过程是C。
A.PrivateSubCommand1_Click()
CommonDialog1.DialogTitle="
NewTitle"
CommonDialog1.ShowPrinter
B.PrivateSubCommand1_Click()
CommonDialog1.ShowFont
C.PrivateSubCommand1_Click()
CommonDialog1.ShowOpen
D.PrivateSubCommand1_Click()
CommonDialog1.ShowColor
(33)如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是D。
A.任何时刻最多只有一个窗体是活动窗体
B.不能把标准模块设置为启动模块
C.用Hide方法只是隐藏一个窗体,不能从内存中清除该窗体
D.如果工程中含有SubMain过程,则程序一定首先执行该过程
(34)假定在工程文件中有一个标准模块,其中定义了如下记录类型
TypeBooks
NameAsString*10
TelNumAsString*20
EndType
要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。
下列能
够完成该操作的事件过程是A。
DimBAsBooks
Open"
c:
\Person.txt"
ForOutputAs#1
8
B.Name=InputBox("
输入姓名"
B.TelNum=InputBox("
输入电话号码"
Write#1,B.Name,B.TelNum
Close#1
ForInputAs#1
Print#1,B.Name,B.TelNum
Name=InputBox("
TelNum=InputBox("
Write#1,B
DimBAsBook
(35)目录列表框的Path属性的作用是B。
A.显示当前驱动器或指定驱动器上的某目录下的文件名
B.显示当前驱动器或指定驱动器上的目录结构
C.显示根目录下的文件名
D.显示指定路径下的文件
2分,共30分)
请将每空的正确答案写在答题卡【1】~【15】序号的横线上,答在试卷上不得分。
(1)数据管理技术发展过程经过人工管理、文件系统和数据库系统三个阶段,其中数据独
立性最高的阶段是【1】。
(2)算法复杂度主要包括时间复杂度和【2】复杂度。
(3)在进行模块测试时,要为每个被测试的模块另外设计两类模块:
驱动模块和承接模块
(桩模块)。
其中【3】的作用是将测试数据传送给被测试的模块,并显示被测试模块所产生的结果。
(4)一棵二叉树第六层(根结点为第一层)的结点数最多为【4】个。
(5)数据结构分为逻辑结构和存储结构,循环队列属于【5】结构。
(6)设有以下函数过程:
Functionfun(mAsInteger)AsInteger
DimkAsInteger,sumAsInteger
Fork=mTo1Step-2
sum=sum+k
Nextk
fun=sum
若在程序中用语句s=fun(10)调用此函数,则s的值为【6】。
(7)在窗体上画一个命令按钮和一个文本框,然后编写命令按钮的Click事件过程。
程序
运行后,在文本框中输入一串英文字母(不区分大小写),单击命令按钮,程序可找出未在
文本框中输入的其他所有英文字母,并以大写方式降序显示到Text1中。
例如,若在Text1
中输入的是abDfdb,则单击Command1按钮后Text1中显示的字符串是
ZYXWVUTSRQPONMLKJIHGEC。
请填空。
PrivateSubCommand1_Click()
DimstrAsString,sAsString,cAsString
str=UCase(Text1)
s="
c="
Z"
Whilec>
="
IfInStr(str,c)=0Then
s=【7】
c=Chr$(Asc(c)【8】)
Wend
Ifs<
"
Then
Text1=s
(8)在n个运动员中选出任意r个人参加比赛,有很多种不同的选法,选法的个数可以用
公式计算。
下图窗体中3个文本框的名称依次是Text1、Text2、Text3。
程
10
序运行时在T