历年二级VB语言笔试真题及答案.docx
《历年二级VB语言笔试真题及答案.docx》由会员分享，可在线阅读，更多相关《历年二级VB语言笔试真题及答案.docx（46页珍藏版）》请在冰豆网上搜索。
历年二级VB语言笔试真题及答案
2008年4月全国计算机等级考试二级VB试卷
一、选择题
1、程序流程图中带有箭头的线段表示的是
A）图元关系 B）数据流 C）控制流 D）调用关系
2、结构化程序设计的基本原则不包括
A）多态性 B）自顶向下 C）模块化 D）逐步求精
3、软件设计中模块划分应遵循的准则是
A）低内聚低耦合 B）高内聚低耦合 C）低内聚高耦合 D）高内聚高耦合
4、在软件开发中，需求分析阶段产生的主要文档是
A）可行性分析报告B）软件需求规格说明书C）概要设计说明书D）集成测试计划
5、算法的有穷性是指
A）算法程序的运行时间是有限的 B）算法程序所处理的数据量是有限的
C）算法程序的长度是有限的 D）算法只能被有限的用户使用
6、对长度为n的线性表排序，在最坏的情况下，比较次数不是n（n-1）/2的排序方法是
A）快速排序 B）冒泡排序 C）直接插入排序 D）堆排序
7、下列关于栈的叙述正确的是
A）栈按“先进先出”组织数据 B）栈按“先进后出”组织数据
C）只能在栈底插入数据 D）不能删除数据
8、在数据库设计中，将E—R图转换成关系数据模型的过程属于
A）需求分析阶段 B）概念设计阶段 C）逻辑设计阶段 D）物理设计阶段
9、有三个关系R、S和T（略）
10、设有表示学生选课的三张表，学生S（学号，姓名，性别，年龄，身份证号），课程（课号，课名），选课SC（学号，课号，成绩），则表SC的关键字（键或码）为
Ａ）课号，成绩 B）学号，成绩 C）学号，课号 D）学号，姓名，成绩
11、以下叙述中错误的是
Ａ）标准模块文件的扩展名是.bas B）标准模块文件是纯代码文件
C）在标准模块中声明的全局变量可以在整个工程中使用 D）在标准模块中不能定义过程
12、在VisualBasic中，表达式3*2\5Mod3的值是
Ａ）１ B）０ C）３ D）出现错误提示
13、以下选项中，不合法的VisualBasic变量名是
Ａ）a5b B）_xyz C）a_b D）andif
14、以下数组定义语句中，错误的是
Ａ）Statica（10）AsInteger B）Dimc（3,1to4）
C）Dimd（-10） D）Dimb（0to5,1to3）AsInteger
15、现有语句：
y=IIf（x>0,xMod3,0），设x=10，则y的值是
Ａ）０ B）１ C）３ D）语句有错
16、为了使文本框同时具有垂直和水平滚动条，应先把MultiLine属性设置为True，然后再把Scrollbars属性设置为
Ａ）０ B）１ C）２ D）３
17、文本框Text1的KeyDown事件过程如下：
PrivateSubText1_KeyDown（KeyCodeAsInteger,ShiftAsInteger）
EndSub
其中参数KeyCode的值表示的是发生此事件时
Ａ）是否按下了Alt键或Ctrl键 B）按下的是哪个数字键
C）所按的键盘键的键码 D）按下的是哪个鼠标键
18、窗体上有一个名称为Hscroll1的滚动条，程序运行后，当单击滚动条两端的箭头时，立即在窗体上显示滚动框的位置（即刻度值）。
下面能够实现上述操作的事件过程是
Ａ）PrivateSubHscroll1_Changc（） B）PrivateSubHsctroll1_Change（）
PrintHScroll1.Value PrintHScroll1.SmallChange
EndSub EndSub
C）PrivateSubHScroll1_Scroll（） D）PrivateSubHScroll1_Scroll（）
PrintHScroll1.Value PrintHScroll1.SmallChange
EndSub EndSub
19、若已把一个命令按钮的Default属性设置为True，则下面可导致按钮的Click事件过程被调用的操作是
Ａ）用鼠标右键单击此按钮 B）按键盘上的Esc键
C）按键盘上的回车键 D）用鼠标右键双击此按钮
20、要使两个单选按钮属于同一个框架，正确的操作是
Ａ）先画一个框架，再在框架中画两个单选按钮
B）先画一个框架，再在框架外画两个单选按钮，然后把单远按钮拖到框架中
C）先画两个单选按钮，再画框架将单选按钮框起来
D）以上三种方法都正确
21、能够存放组合框的所有项目内容的属性是
Ａ）Caption B）Text C）List D）Selected
22、设窗体上有一个标签Labell和一个计时器Timer1，Timer1的Interval属性被设置为1000，Enabled属性被设置为True。
要求程序运行时每秒在标签中显示一次系统当前时间。
以下可以实现上述要求的事件过程是
Ａ）PrivateSubTimer1_Timer（） B）PrivateSubTimer1_Timer（）
Label1.Caption=True Label1.Caption=Time$
EndSub EndSub
C）PrivateSubTimer1_Timer（） D）PrivateSubTimer1_Timer（）
Label1.Interval=1 Fork=lToTimer1.Interval
EndSub Label1.Caption=Timer
Nextk
EndSub
23、设有窗体上有一文本框和一按钮和以下程序：
PrivateSubCommand1_Click（）
Textl.Text=“VisualBasic”
EndSub
PrivateSubText1_LostFocus（）
IfText1.Text<>“BASIC”Then
Text1.Text=””
Text1.SetFocus
EndIf
EndSub
程序运行时，在Text1文件框中输入“Basic”（如图所示），然后单击Command1按钮，则产生的结果是
Ａ）文本框中无内容，焦点在文本框中 B）文本框中为“Basic”,焦点在文本框中
C）文本框中为“Basic”,焦点的按钮上 D）文本框中为“VisualBasic”,焦点的按钮上
24、窗体上有一个名称为Command1的命令按钮，其事件过程如下：
PrivateSubCommand1_Click（）
x=“VisualBasicProgramming”
a=Right（x,11）
b=Mid（x,7,5）
C=Msgbox（a,,b）
EndSub
运行程序后单击命令按钮，以下叙述中错误的是
Ａ）信息框的标题是Basic B）信息框中的提示信息是Programming
C）C的值是函数的返回值 D）MsgBox的使用格式有错
25、设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas，两个窗体上分别只有一个名称Command1的命令按钮。
Form1的代码如下：
PublicXAsInteger
PrivateSubForm_load（）
x=1
y=5
EndSub
PrivateSubCommand1_Click（）
Form2.Show
EndSub
Form2的代码如下：
PrivateSubCommand1_Ciick（）
PrintForm1.x,y
EndSub
Module1的代码如下：
PublicyAsInteger
运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是
Ａ）１ ５ B）０ ５ C）０ ０ D）程序有错
26、窗体上有一个名称Text1的文本框，一个名称为Command1的命令按钮。
窗体文件的程序如下：
PrivateTypex
aAsInteger
bASInteger
EndType
PrivateSubCommand1_Click（）
DimyAsx
y.a=InputBox（“”）
Ify.a\2=y.a/2Then
y.b=y.a*y.a
Else
y.b=Fix（y.a/2）
EndIf
Text1.Text=y.b
EndSub
对以上程序，下列叙述中错误的是
Ａ）x是用户定义的类型 B）InputBox函数弹出的对话框中没有提示信息
C）若输入的是偶数，y.b的值为该偶数的平方
D）Fix（y.a/2）把y.a/2的小数部分四舍五入，转换为整数返回
27、窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数Command1,其下标从左到右分别为0、1、2、3,caption分别为打开、保存、打印、退出。
窗体外观如图所示。
命令按钮的事件过程如下：
PrivateSubCommand1_Click（IndexAsInteger）
SelectCaseIndex
Case0
CD1.Action=1
Case1
CD1.ShowSave
Case2
CD1.Action=5
Case3
End
EndSelect
EndSub
对上述程序，下列叙述中错误的是
Ａ）单击“打开”按钮，显示打开文件的对话框
B）单击“保存”按钮，显示保存文件的对话框
C）单击“打印”按钮，能够设置打印选项，并执行打印操作
D）单击“退出”按钮，结束程序的运行
28、窗体上有两个水平滚动条HV、HT，还有一个文本框Text1和一个标题为“计算”的命令按钮Command1，并编写了以下程序：
PrivateSubCommand1_ClickO
CallCale（HV.Value,HT.Value）
EndSub
PublicSubCale（xASInteger,yASInteger）
Text1.Text=x*y
EndSub
运行程序，单击“计算”按钮，可根据速度与时间计算出距离，并显示计算结果。
对以上程序，下列叙述中正确的是
Ａ）过程调用语句不对，应为Cale（HV,HT）
B）过程定义语句的形式参数不对，应为SubCale（xAsControl,yAsControl）
C）计算结果在文本框中显示出来
D）程序不能正确运行
29、现有如下程序：
PrivateSubCommand1_Click（）
S=0
Fori=1to5
S=S+f（5+i）
Next
Print S
EndSub
PublicFunctionf（xAsInteger）
Ifx>=10Then
t=x+1
Else
t=x+2
EndIf
f=t
EndFunction
运行程序，则窗体上显示的是
Ａ）38 B）49 C）61 D）70
30、窗体上有一个用菜单编辑器设计的菜单（见上图）。
运行程序，并在窗体上单击鼠标右键，则弹出一个快捷菜单，有三个选项：
复制、粘贴（灰色）、选中（前面打勾）。
以下叙述中错误的
Ａ）在设计“粘贴”菜单项时，在菜单编辑器窗口中设置了“有效”属性（有“√”）
B）菜单中的横线是在该菜单项的标题输入框中输入了一个“－”（减号）字符
C）在设计“选中”菜单项时，在菜单编辑器窗口中设置了“复选”属性（有“√”）
D）在设计该弹出菜单的主菜单项时，在菜单编辑器窗口中去掉了“可见”前面的“√”
31、窗体上有一个名称为Picture1图片框控件，一个名称Label1的标签控件。
现有如下程序：
PublicSubdisplay（xAsControl）
IfTypeOfx isLabelThen
x.Caption=“计算机等级考试”
Else
x.Picture=Loadpicture（“pic.jpg”）
EndIf
EndSub
PrivateSubLabel1_Click（）
Calldisplay（Label1）
EndSub
PrivateSubPicture1_Click（）
Calldisplay（Picture1）
EndSub
对以上程序，下列叙述中错误的是
Ａ）程序运行时会出错 B）单击图片框，在图片框中显示一幅图片
C）过程中的X是控件变量 D）单击标签，在标签中显示一串文字
32、窗体上有两个名称分别为Text1、Text2的文本框。
Text1的KeyUp的事件过程如下：
PrivateSubText1_KeyUp（KeyCodeAsInteger,shiftASInteger）
DimCASstring
Tcxt2.Text=Chr（Asc（c）+2）
EndSub
当向文本框Text1中输入小写字母a时，文本框Text2中显示的是
Ａ）Ａ B）a C）C D）c
33、设窗体上有一个文体框Text1和一个命令按钮Command1,并有以下事件过程：
PrivateSubCommand1_Click（）
DimSAsString,chAsString
S=“”
Fork=1TOLen（Text1）
ch=Mid（Text1,k,l）
S=ch+S
Nextk
Text1.Text=S
EndSub
程序执行时，在文本框中输入“Basic”,然后单击命令按钮，则Text1中显示的是
A）Basic B）cisaB C）BASIC D）CISAB
34、某人编写了如下程序，用来求10个整数（整数从键盘输入）中的最大值：
PrivateSubCommand1_Click（）
Dima（10）AsInteger,maxAsInteger
Fork=1TO10
a（K）=InputBox（“输入一个整数”）
Nextk
Max=0
Fork=1To10
Ifa（k）＞maxThen
Max=a（k）
EndIf
Nextk
Printmax
EndSub
运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的，程序需要修改，下面的修改中可以得到正确运行结果的是
A）把Ifa（k）>maxThen改为Ifa（k）C）把第2个循环语句Fork=1TO10改为Fork=2TO10D）把max=0改为max=a（10）
35、已知在4行3列的全局数组score（4,3）中存放了4个学生3门课程的考试成绩（均为整数）。
现需要计算每个学生的总分，某人编写程序如下：
OptionBase1
PrivateSubCommand1_Click（）
DimsumAsInteger
Sum=0
Fori=1To4
Forj=1To3
Sum=sum+score（i,j）
Nextj
Print“第”&i&”个学生的总分是:
”;sum
Nexti
EndSub
运行此程序时发现，除第1个人的总分计算正确外，其他人的总分是错误的。
程序需要修改。
以下修改方案中正确的是
A）把外层循环语句Fori=1TO4改为Fori=1To3
内层循环语句Forj=1TO3改为Forj=1TO4
B）把sum=0移到Fori=1TO4和Forj=1TO3之间
C）把sum=sum+score（i,j）改为sum=sum+score（j,i）
D）把sum=sum+score（i,j）改为sum=score（i,j）
二、填空题
（1）测试用例包括输入值集和[1] 值集。
（2）深度为5的满二叉树有[2] 个叶子结点。
（3）设某循环队列的容量为50，头指针Front=5（指向队头元素的前一位置），尾指针rear=29（指向队尾元素），则该循环队列中共有[3] 个元素。
（4）在关系数据库中，用来表示实体之间联系的是[4] 。
（5）在数据库管理系统提供的数据定义语言、数据操纵语言和数据控制语言中，[5] 负责数据的模式定义与数据的物理存取构建。
（6）设有以下的循环：
要求程序运行时执行3次循环体，请填空。
x=1
DO
x=x+2
Printx
LoopUntil[6]
（7）窗体上命令按钮Command1的事件过程如下：
PrivateSubCommand1_Click（）
DimtotalAsInteger
total=s
（1）+s
（2）
Printtotal
EndSub
PrivateFunctions（mAsInteger）AsInteger
StaticxAsInteger
Fori=1Tom
x=x+1
Nexti
S=x
EndFunction
运行程序，第3次单击命令按钮Command1时，输出结果为[7]
（8）在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
OptionBasel
PrivateSubCommand1_Click（）
Dima（10）AsInteger
Fori=1To10
a（i）=i
Next
Callswap（[8]）
Fori=1To10
Printa（i）
Next
EndSub
Subswap（b（）AsInteger）
n=[9]
Fori=1Ton/2
t=b（i）
b（i）=b（n）
b（n）=t
[10]
Next
EndSub
上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a
（1）与a（10）的值互换，a
（2）与a（9）的值互换，请填空。
（9）在窗体上面一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：
PrivateSubCommand1_Click（）
CommonDialog1.Filter=“AllFiles（*.*）|*.*|TextFiles”_
&”（*.txt）|*.txt|BatchFiles（*.bat）|*.bat”
CommonDialog1Filterlndex=1
Commondialog1.ShowOpen
MsgBoxCommonDialog1.FileName
EndSub
程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是[11]；如果在对话框中选择d盘temp目录下的tel.txt文件，然后单击“确定”按钮，则在MsgBox信息框中显示的提示信息是[12]。
（10）以下程序的功能是：
把程序文件smtext1.txt的内容全部读入内存，并在文本框Text1中显示出来。
请填空。
PrivateSubCommand1_Click（）
DiminDataAsString
Text1.Text=“”
Open“smtext1.txt”[13] As[14]
DoWhile[15]
Input#2,inData
Text1.Text=Text1.Text&inData
Loop
Close#2
EndSub
2008年9月全国计算机等级考试二级笔试试卷
一、选择题（每小题2分，共70分）
（1）一个栈的初始状态为空。
现将元素1、2、3、4、5、A、B、C、D、E依次入栈，然后再依次出栈，则元素出栈的顺序是（）。
A）12345ABCDE
B）EDCBA54321
C）ABCDE12345
D）54321EDCBA
（2）下列叙述中正确的是（）。
A）循环队列有队头和队尾两个指针，因此，循环队列是非线性结构
B）在循环队列中，只需要队头指针就能反映队列中元素的动态变化情况
C）在循环队列中，只需要队尾指针就能反映队列中元素的动态变化情况
D）循环队列中元素的个数是由队头指针和队尾指针共同决定
（3）在长度为n的有序线性表中进行二分查找，最坏情况下需要比较的次数是（）。
A）O（n）
B）O（n2）
C）O（log2n）
D）O（n log2 n）
（4）下列叙述中正确的是（）。
A）顺序存储结构的存储一定是连续的，链式存储结构的存储空间不一定是连续的
B）顺序存储结构只针对线性结构，链式存储结构只针对非线性结构
C）顺序存储结构能存储有序表，链式存储结构不能存储有
升级会员 