计算机等级考试二级VB模拟题.docx
《计算机等级考试二级VB模拟题.docx》由会员分享，可在线阅读，更多相关《计算机等级考试二级VB模拟题.docx（11页珍藏版）》请在冰点文库上搜索。
计算机等级考试二级VB模拟题
2007～2008学年第二学期
《VisualBasic程序设计》期末考试题（B卷）
学院（系）班级学号（最后两为）姓名
注意：
一、二、三题的答案必须按题号和顺序填写到答案表中，否则无效。
题号
一
二
三
四
总分
得分
阅卷人
核分人签名：
答案表：
一、单选题
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
二、写出程序运行结果或功能
1
2
3
4
5
三、填写程序中缺少部分
1
2
【1】
【2】
【3】
【4】
【5】
3
4
【6】
【7】
【8】
【9】
【10】
四、编写程序
1.
PrivateSubCommand1_Click（）
EndSub
2.
PrivateSubCommand1_Click（）
EndSub
3.PrivateSubCommand1_Click（）
EndSub
2007～2008学年第二学期
《VisualBasic程序设计》期末考试题（B卷）
学院（系）班级学号（最后两为）姓名
注意：
一、二、三题的答案必须按题号和顺序填写到答案表中，否则无效。
题号
一
二
三
四
总分
得分
阅卷人
核分人签名：
一.选择题（每小题1分，共30分）
1.下面的运算符中，优先级最高的是。
A.And B.* C.>= D.&
2.VB是一种面向对象的可视化程序设计语言，用户要为某个对象的某个（）来编写事件过程。
A．方法B．变量C．属性D．事件
3.工程文件的文件名后缀是。
A.bmp B.vbp C.frm D.bas
4.一个对象可以识别的动作分别称为。
A.事件 B.过程C.属性 D.方法
5.以下对象没有Caption属性。
A.Form B.CommandButton C.TextBox D.Label
6.下列选项中，是所有控件共有的属性。
A.Caption B.Value C.Text D.Name
7.下列哪一个表达式的值是逻辑型。
A.Len（“abcd”） B.Left（“abcd”,2）
C.3<4 D.date（）
8.通常，文本框的SetFocus方法不能使用在事件过程中。
A.Form_ClickB.Form_LoadC.Command_ClickD.Label_click
9.窗体模块保存在一个扩展名为（）的文件中。
A.basB.clsC.frmD.bmp
10.若要以代码方式设置在文本框中显示文本的字体大小，则用文本框的属性来实现。
A.FontName B.Font C.FontSize D.FontBold
11.若要取消窗体的最大化功能，则可设置属性为False来实现。
A.ControlBox B.MinButton C.MaxButton D.Enabeld
12.若要将窗体隐藏起来，则实现的方法为。
A.Unload B.Show C.WindowsState D.Hide
13.若要使标签的大小自动适应所显示的文本，可设置属性的值来实现。
A.AutoSize B.Alignment C.Enabled D.Visble
14.若要暂时关闭定时器，则可通过设置属性来实现。
A.Interval B.Visible C.Enabled D.Timer
15.如果有声明Dima（15）AsInteger，则该数组共有个元素。
A．15 B．16 C．13 D．不确定
16.工程文件保存在一个扩展名为的文件中。
A．bas B．cls C．frm D．vbp
17.文本控件Text属性的值是类型。
A.字符型B．整型 C．逻辑型 D．日期型
18.读随机文件中的记录信息，应使用下面语句。
A.ReadB.Get C.Input# D.LineInput#
19.在一行内写多个语句时，每个语句之间要用（）符号做分隔。
A．，B．；C．、D．：
20.在VB6.0中，常量12.12!
的数据类型是。
A.整型B.单精度型C.双精度型D.长整型
21.若要在文本框中显示多行数据，可通过设置属性来实现。
A.MultiLineB.IndexC.TextD.Left
22.下列函数中（）是求系统时钟函数。
A．Date（）B.Time（）C.Now（）D.Sqr（）
23.设A=2：
B=3：
C=4：
D=5。
以下表达式的值为True的是。
A.A>BANDC<=DOR2*A>C
B.3>2*BORA=CANDB<>CORC>D
C.NOTA<=COR4*C=B^2ANDB<>C+A
D.A+B+C>DORA*B24.执行语句S=Len（Mid（“VisuaiBasic”,7,5））后，S的值是（）。
A.VisualB.BasicC.5D.10
25.如果要用文本框来给某个变量赋值，要使用文本框的（）属性。
A.TextB.TabIndexC.IndexD.MultiLine
26.下列是日期型常量。
A."2/1/02"B.2.1.02C.#2/1/02#D.{2/1/02}
27.表达式5^2Mod25\2^2的值是。
A.1B.0C.6D.4
28.表达式Int（24.56）的值为。
A.24B.25C.24.5D.24.56
29.在参数传递过程中，使用关键字来修饰参数，可以使之按值传递。
A.ByValB.ByRefC.ValueD.Reference
30.将条件“X是小于100的非负数”用VB的表达式表示为（）。
A．0≤X＜100B．0〈=X〈100
C．0〈=XANDX〈100D．0〈=XORX〈100
二.写出程序运行结果（每题4分，共20分）
1.给出运行下面程序，单击窗体后，屏幕上显示的结果。
PrivateSubForm_Click（）
Dimx,yAsInteger
x=1:
y=0
DoWhilex<3
Y=y+x
x=x+1
Loop
Printx,y
EndSub
2.下面程序段，当用户连续第3次单击窗体后，标签上显示的结果是（）。
PrivateSubForm_Click（）
StaticIndexAsInteger
Index=Index+1
SelectCaseIndex
Case1
Label1.Caption=“复制操作”
Case2
Label1.Caption=“剪切操作”
Case3
Label1.Caption=“粘贴操作”
Case4
Label1.Caption=“清除操作”
Index=0
EndSelect
EndSub
3给出下列程序段的输出结果
PrivateSubCommand1_Click（）
Dimm（10）
Fork=1To10
m（k）=11-k
Nextk
x=6
Printm（x）
EndSub
4.给出下列程序代码在单击命令按钮时的输出结果。
PrivateSubCommand1_Click（）
s="中国加油！
四川加油！
"
k=0
Forn=1ToLen（s）
p=Mid（s,n,2）
Ifp="加油"Then
k=k+1
EndIf
Next
Printk
EndSub
5.写出下列程序的功能。
n=4
p=1
k=1
s=0
DoWhilek<=n
p=p*k
s=s+p
k=k+1
Loop
三.根据程序的功能填写程序中缺少的部分（每题5分，共20分）
1.在窗体上输出由*组成的三角形。
***************
*************
***********
*********
*******
*****
***
*
编写窗体的单击事件的程序代码如下：
PrivateSubCommand1_Click（）
Cls
Print:
Print:
Print
Fori=1To8
PrintTab（5+i）;
Forj=1To【1】
Print"*";
Next
【2】
Next
EndSub
2.下列程序段产生10个[10,99]之间的随机数，保存在a数组中，并在窗体中的Label1控件中显示出这10个随机数。
PrivateSubForm_Load（）
DimpAsString
Randomize
p=""
Fori=1To10
a（i）=Int（Rnd*【3】）+【4】
p=p&Str（a（i））&","
Next
Label1.Caption=LTrim（【5】）
EndSub
3.以下程序用于计算1+（1+3）+（1+3+5）+…+（1+3+5+…+39）。
PrivateSubCommand1_Click（）
t=0
m=1
Sum=0
Do
t=t+【6】
Sum=Sum+【7】
m=m+2
LoopWhilem【8】
Print"sum=";Sum
EndSub
4.下列程序求50-100之间的所有素数。
PrivateSubCommand1_Click（）
DimiAsInteger
DimjAsInteger
Fori=51To100Step2
f=0
Forj=2To【9】
IfiModj=0Then
f=1
ExitFor
EndIf
Next
Iff=【10】Then
Printi
EndIf
Next
EndSub
四.编写程序（每题10分，共30分）
1.编程计算2+4+6+…+100的值，并显示在文本框中（如图）。
PrivateSubCommand1_Click（）
EndSub
2.编写程序滤出字符串中所有的空格。
在窗体上的文本框Text1控件输入字符串，单击命令按钮Command1时在标签控件Label1中输出结果。
3.用SelectCase结构编程计算个人所得税。
工资<=2000免税；2000<工资<＝2500的部分税率5%；2500<工资<=4000的部分税率10%；4000<工资<=6000的部分税率15%；6000元以上的部分税率20%。
工资由窗体上的文本框Text1控件输入，单击命令按钮Command1时在标签控件Label1中输出结果。
升级会员 