全国计算机等级考试二级VB试题Word格式文档下载.docx
《全国计算机等级考试二级VB试题Word格式文档下载.docx》由会员分享,可在线阅读,更多相关《全国计算机等级考试二级VB试题Word格式文档下载.docx(13页珍藏版)》请在冰豆网上搜索。
B)表示关系的二维表中各元组的每一个分量还可以分成若干数据项
C)一个关系的属性名表称为关系模式
D)一个关系可以包括多个二维表
(11)要使一个文本框可以显示多行文本,应设置为True的属性是
A)Enabled
B)MultiLine
C)MasLenfth
D)Width
(12)在窗体上有一个名为Text1的文本框。
当光标在文本框中时,如果按下字母键“A”,则被调用的事件过程是
A)Form_KeyPress()
B)Text1_LostFocus()
C)Text1_Click()
D)Test1_Change()
(13)设在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。
要求单击Command1按钮时可把光标移到文本框中。
下面正确的事件过程是
A)Private
Sub
Command1_Click()
B)Private
Text1.GotFocus
Command1.GotFocus
End
EndSub
C)Private
D)Private
Text1.SetFocus
Command1.SetFocus
Sub
(14)执行以下程序后输出的是
Private
Command1_Click()
Ch$=”AABCDEFGH”
Print
Mid(Righ(ch$,6),Len(left(ch$,4)),2)
A)CDEFGH
B)ABCD
C)FG
D)AB
(15)设在窗体Form1上有一个列表框List1,其中有若干个项目。
要求单击列表框中某一项时,把该项显示在窗体上,正确的事件过程是
A)Prvate
List1_Click()
Form1_Click()
List1.Text
List1.Text
Form1.Text
List1.Print
(16)若窗体上的图片框中有一个命令按钮,则此按钮的Left属性是指
A)按钮左端到窗体左端的距离
B)按钮左端到图片框左端的距离
C)按钮中心点到窗体左端的距离
D)按钮中心点到图片框左端的距离
(17)为使程序运行时通用对话框CD1上显示的标题为“对话框窗口”,若通过程序设置该标题,则应使用的语句是
A)CD1.DialogTitle=“对话框窗口”
B)CD1.Action=“对话框窗口”
C)CD1.FileName=“对话框窗口”
D)CD1.Filter=“对话框窗口”
(18)在窗体上有如右图所示的控件,各控件的名称
与其标题相同,并有如下程序:
Form_Load()
Command2.Enabled=False
Check1.value=1
刚运行程序时,看到的窗体外观是:
(19)设在窗体中有一个名称为List1的列表框,其中有若干个项目(如图)。
要求选中某一项后单击Command1按钮,就删除选中的项,则正确的事件过程是
List1.Clear
B)
List1.Clear
List1.ListIndex
C)
List1.Removeltem
D)
List1.Removeltem
(20)某人设计了如下程序用来计算并输出7!
(7的阶乘)
t=0
For
k=7
To
2
Step
-1
t=t*k
Next
t
执行程序时,发现结果是错误的,下面的修改方案中能够得到正确结构的是
A)把t=0改为t=1
B)把For
k
=
7
-1改为For
=7
1
C)把For
Stip-1改为Fork=1
7
D)把Next改为Nexi
k
(21)若窗体中已经有若干个不同的单选按钮,要把它们改为一个单选按钮数组,在属性窗口中需要且只需要进行的操作是
A)把所有单选按钮的Index属性改为相同值
B)把所有单选按钮的Index
属性改为连续的不同值
C)把所有单选按钮的Caption属性值改为相同
D)把所有单选按钮的名称改为相同,且把它们的Index属性改为连续的不同值。
(22)窗体上有文本框Text1和一个菜单,菜单标题、名称如表,结构见图。
要求程序执行时单击“保存”菜单项,则把其标题显示在Text1文本框中。
下面可实现此功能的事件过程是:
标题
名称
文件
file
新建
new
保存
save
save_Click()
save_Click()
Text1.Text=file.save.Caption
Text1.Text=save.Caption
file_Click()
file_Click()
(23)某人在窗体上画了一个名称为Timer1的计时器和一个名称为Lab
的属性设置为Enabled=True,
Interval=0,并编程如下。
希望在每2秒在标签上显示一次系统当前时间。
Timer1_Timer()
Label1.Caption=Time$
在程序执行时发现未能实现上述目的,那么,他应做的修改是
A)通过属性窗口把计时器的Interval属性设置为2000
B)通过属性窗口把计时器的Enabled属生设置为False
C)把事件过程中的Label1.Caption=Time$语句改为Timer1.Interval=Tims$
D)把事件过程中的Label1.Caption=Time$语句改为Label1.Caption=Timer1.Time
(24)形状控件的Shape属性有6种取值,分别代表6种几何图形。
下列不属于这6种几何图形的是
(25)下面关于文件的叙述中错误的是
A)随机文件中各条记录的长度是相同的]
B)打开随机文件时采用的文件存取方式应该是Random
C)向随机文件中写数据应使用语句Print#文件号
D)打开随机文件与打开顺序文件一样,都使用Open语句
(26)设窗体上有一个图片框Picture1,要在程序运行期间装入当前文件夹下的图形文件File1.jpg,能实现此功能的语句是
A)Picture1.Picture=”Flie1.jpg
B)Picture1.Picture=LoadPicture(“File1.jpg”)
LoadPicture(“File1.jpg”)
D)Call
LoadPicture(“File1.jpg”)
(27)下面程序执行时,在窗体上显示的是
Dim
a(10)
10
a(k)
11
–
Next
a(a(3)\a(7)
Mod
a(5))
A)3
B)5
C)7
(28)为达到把a、b中的值交换后输出的目的,某人编程如下:
a%
10:
b%
20
Call
swap(a,b)
a,b
swap(ByVal
a
As
Integer,ByVal
b
Integer)
c=
a:
a=b:
b=c
在运行时发现输出结果错了,需要修改。
下面列出的错误原因和修改方案中正确的是
A)调用swap过程的语句错误,应改为Call
swap
B)输出语句错误,应改为:
”a”,”b”
C)过程的形式参数有错,应改为:
swap(ByRef
Integer,ByRef
D)swap中3条赋值语句的顺序是错误的,应改为a=b:
b=c:
c=a
(29)有如下函数:
Function
fun(a
Integer,n
Integer)
Integer
m
While
>
=n
a=a-n
m=
m+1
Wend
fun=m
Function
该函数的返回值是
A)a乘以n的乘积
B)a加n的和
C)a减n的差
D)a除以n的商(不含小数部分)
(30)下面程序的输出结果是
ch$=”ABCDEF”
proc
ch
proc(ch
String)
S=””
k=Len(ch)
Step-1
s=s&
Mid(ch,k,1)
ch=s
A)ABCDEF
B)FEDCBA
C)A
D)F
(31)某人编写了一个能够返回数组a中10个数中最大数的函数过程,代码如下:
Maxvalue(a()
max%
max=1
If
a(k)>
a(max)
Then
max
If
Maxvalue
max
程序运行时,发现函数过程的返回值是错的,需要修改,下面的修改方案中正确的是
A)语句max
1应改为max
a
(1)
B)语句For
10应改为For
C)If语句中的条件a(k)>
a(max)应改为a(k)>
D)语句Maxvalue
应改为Maxvalue
a(max)
(32)在窗体上画一个名称为Command1的命令按钮,并编写以下程序:
n%,b,t
t
1:
2
Do
b*n
+
b
+1
Loop
Until
n>
9
此程序计算并输出一个表达式的值,该表达式是
A)9!
B)10!
C)1!
+2!
+…+9!
D)1!
+…+10!
(33)有一个名称为Form1的窗体,上面没有控件,设有以下程序(其中方法Pset(X,Y)的功能是在坐标X,Y处画一个点):
cmdmave
Boolean
Form_MouseDown(Button
Integer,Shift
Integer,
X
Single,Y
Single)
True
Form_MouseMove(Button
Single,
Y
Form1.Pset(X,Y)
Form_MouseUp(Button
Shift
False
此程序的功能是
A)每按下鼠标键一次,在鼠标所指位置画一个点
B)按下鼠标键,则在鼠标所指位置画一个点;
放开鼠标键,则此点消失
C)不按鼠标键而拖动鼠标,则沿鼠标拖动的轨迹画一条线
D)按下鼠标键并拖动鼠标,则沿鼠标拖动的轨迹画一条线,放开鼠标键则结束画线
(34)某人设计了下面的函数fun,功能是返回参数a中数值的位数
n%
1
\
10
fun
n
在调用该函数时发现返回的结果不正确,函数需要修改,下面的修改方案中正确的是
A)把语句n
1改为n
B)把循环条件a
0改为a
C)把语句
10改为a
D)把语句fun
n改为
a
(35)在窗体上有一个名称为Check1的复选框数组
(含4个复选框),还有一个名称为Text1的文本
框,初始内容为空。
程序运行时,单击任何复选
框,则把所有选中的复选框后面的方字罗列在文
本框中(见图)。
下面能实现此功能的事件过程是
Check1_Click(Indes
Text1.Text
="
"
0
3
Check1(k).value
&
Check1(k).Caption
'
双引号中是空格
Check1_Click(Index
Check1(Index).Caption
Exit
For
二、填空题(每空2分,共30分)
请将每空的正确答案写在答题卡[1]~[15]序号的横线上,答在试卷上不得分。
(1)软件需求规格说明书应具有完整性,无岐义性、正确性、可验证性、可修改性等特征,其中最重要的是【1】
。
(2)在两种基本测试方法中,【2】
测试的原则之一是保证所测模块中每一个独立路径至少执行一次。
(3)线性表的存储结构主要分为顺序存储结构和链式存储结构。
队列是一种特殊的线性表,循环队列是队列的【3】
存储结构。
(4)对下列二叉树进行中序遍历的结果为【4】
(5)在E-R图中,矩形表示【5】
(6)窗体上有一个组合框,其中已输入了
若干个项目。
程序运行时,单击其中一
项,即可把该项与最上面的一项交换。
例如:
单击图1中的“重庆”,则与“北
京”交换,得到图2的结果。
下面是可
实现此功能的程序,请填空。
Combo1_Click()
temp
temp
Combo1.Text
[6]
Combo1.List(0)
Combo1.List(0)
(7)设窗体上有一个名称为HScroIII的水平滚动条,要求当滚动块移动位置后,能够在窗体上输出移动的距离(即新位置与原位置的刻度值之差,向右移动为正数,向左移动为负数)。
下面是可实现此功能的程序,请填写。
[7]
pos=HScroIII.value
HScroIII_Change()
[8]
-pos
(8)设窗体上有一个名称为CD1的通用对话框,一个名称为Text1的文本框和一个名称为Command1的命令按钮。
程序执行时,单击Command1按钮,则显示打开文件对话框,操作者从中选择一个文本文件,并单击对话框上的“打开”按钮后,则可打开该文本文件,并读入一行文本,显示在Text1中。
下面是实现此功能的事件过程,请填空。
CD1.Filter
文本文件1*.txt(Word
文档)*.doc"
CD1.Filterinder
CD1.ShowOpen
CD1.FileName<
Open
[9]
Input
#1
Line
#1,ch$
Close
[10]
(9)下面的程序执行时,可以从键盘输入一个正整数,然后把该数的每位数字按逆序输出。
输入7685,则输出5867,输入1000,则输出0001。
请填空。
x
x=InputBox(“请输入一个正整数”)
x>
__[11]___
10;
x=x\10
Print__[12]__
(10)有如图所示的窗体。
程序执行时先在Text1文本框中输入编号,当焦点试图离开Text1时,程序检查编号的合法性,若编号合法,则焦点可以离开Text1文本框;
否则,显示相应错误信息,并自动选中错误的字符,且
焦点不能离开Text1文本框(见图)。
合法编号的组成是:
前2个字符是大写英文
字母,第3个字符是“-”,后面是数字字符
(至少1个)。
下面程序可实现此功能,请
填空。
Text1_Lostfocus()
k%,n%
n=Len(
[13]
)
k=1
to
if
(n>
3,n,4)
c=Mid(Text1.
Text,k,1)
Select
Case
1,2
c<
A"
Or
c>
Z"
MsgBox("
第"
k&
个字符必须是大写字母!
SetPosition