第二学期VB期末考试复习试卷.doc
《第二学期VB期末考试复习试卷.doc》由会员分享，可在线阅读，更多相关《第二学期VB期末考试复习试卷.doc（17页珍藏版）》请在冰豆网上搜索。
姓名:
学号:
学院:
专业班级:
（密封线内不答题）
……………………………………………………密………………………………………………封………………………………………线……………………………………线………………………………………
_____________________
…
（本科）试卷（A卷）
2013--2014学年第二学期
《VB》试卷
题序
一
二
三
四
五
六
七
八
总分
得分
评卷人
注意：
请务必在答题卡上作答。
得分
一、选择题（共40分，每题1分）
1．Visual Basic 是一种面向对象的可视化程序设计语言，采取了______的编程机制。
A、事件驱动 B、按过程顺序来执行
C、从主程序开始执行 D、按模块顺序执行
2．Visual Basic 是一种面向对象的程序设计语言，_________不是面向对象系统所包含的三要素。
A、变量 B、事件
C、方法 D、属性
3．为了保存一个VisualBasic应用程序，应当________。
A、只保存工程文件（.vbp）
B、分别保存工程文件、窗体文件和标准模块文件
C、分别保存工程文件和标准模块文件（.bas）
D、只保存窗体模块文件（.frm）
4．为了使窗体右移200（twip），应使用的语句是_______。
A、Form1.MoveWidth+200
B、Form1.Move200
C、Form1.MoveForm1.Height+200
D、Form1.MoveLeft+200
5．VB的一个应用程序至少包含一个_________文件，该文件存储窗体上使用的所有控件对象和有关的_______、对象相应的________过程和______代码。
A、模块、方法、事件、程序 B、窗体、属性、事件、程序
C、窗体、程序、属性、事件 D、窗体、属性、事件、模块
6．有程序代码如下：
text1.text="text1.text"
则text1、text、"text1.text"分别代表_________。
A、对象、值、属性 B、对象、方法、属性
C、对象、属性、值 D、属性、对象、值
7．若要设置文本框中所显示的文本颜色，应设置_________属性的值
A、Color B、FillColor
C、BackColor D、ForeColor
8．当运行程序时，系统自动自动执行启动窗体的_________事件过程。
A、Load B、Click
C、UnLoad D、GotFocus
9．设a=10，b=5，c=1，执行语句printa>b>c后，窗体上显示的是___________。
A、False B、出错
C、True D、1
10．函数String（2,"book"）的值是_______。
A、"o" B、"BOOK"
C、"bb" D、"bookbook"
11．以下语句的输出结果是_______。
Print Format $（32548.5,"000,000.00"）
A、32,548.5 B、032,548.50
C、32548.5 D、32,548.50
12．InputBox函数返回值的类型为_____。
A、数值 B、字符串
C、数值或字符串（视输入的数据而定） D、变体
13．当VisualBasic执行下面语句后，A的值为_______
A=1
IfA>0thenA=A+1
IfA>1thenA=0
A、3 B、2
C、1 D、0
14．假定有下面的情况语句：
Selectcasex
为了确定x的绝对值大于5，正确的Case子句为________。
A、Case-5to5 B、Caseabs（x）>5
C、CaseNot（-5to5） D、CaseIs<-5,Is>5
15．以下程序段的输出结果为___________。
x=1
y=4
dountily>4
x=x*y
姓名:
学号:
系别:
年级专业:
（密封线内不答题）
……………………………………………………密………………………………………………封…………线………………………………………
y=y+1
loop
printx
A、8 B、20
C、1 D、4
16．下面的程序计算的数学式是_______。
T=1
S=0
For I=1 to 19 step 2
T=T*I
S=S+T
Next I
Print S
A、1+3+5+...+19 B、1+1*3+1*3*5+...+1*3*5*...19
C、1*3*5*...*19 D、1!
+3!
+5!
+...+19!
17．执行下列程序，从键盘输入10，运行结果是_______。
Private Sub Command1_Click（）
S=InputBox（"请输入一个数字：
"）
Select Case S
Case Is>0
Print ">0"
Case Is>3
Print ">3"
Case Is>5
Print ">5"
End Select
End Sub
A、>3 B、>0
C、出错 D、>5
18．下面程序段的运行结果为：
Fori=3to1step-1
PrintSpc（5-i）;
Forj=1to2*i-1
Print“*”;
Nextj
print
Nexti
A、* B、***** C、***** D、*****
************
********
19．执行下列代码的结果是_______。
Private Sub Command1_Click（）
Dim a（10）
For I = 1 To 10
a（I）= I * 10
Next I
Print a（I）
End Sub
A、110 B、10
C、100 D、数组下标越界
20．执行下面的程序段后，x的值为_________。
x=5
Fori=1To20Step2
x=x+i\5
Nexti
A、24 B、23
C、21 D、22
21．语句Dima（-3to4,3to6）asinteger定义的数组元素的个数是___________。
A、32 B、21
C、18 D、28
22．设如下程序：
Optionbase1
PrivateSubForm_Click（）
Dimarr
arr=array（10,20,"ABCDE"）
Fori=3to1step-1
Printarr（i）;
Nexti
EndSub
程序运行后，单击窗体，在窗体上显示的内容为___________。
A、ABCDE1020 B、出错信息
C、1020ABCDE D、ABCDE2010
23．可获得当前系统日期的函数是___________。
Ａ、Date（） Ｂ、Time（） Ｃ、IsDate（） Ｄ、Year（）
24．以下正确的函数定义形式是____________。
A、Publicf1（aAsSingle） B、Privatef1（aAsSingle）
C、Subf1（aAsSingle） D、Functionf1（A）AsString
25．在窗体上添加一个名为Command1的命令按钮和两个名为Label1、Label2的标签，程序代码如下：
Private x As Integer
Private Sub proc（ByVal a As Integer,ByVal b As Integer）
x=a*a
y=b+b
End Sub
Private Sub Command1_Click（）
x=5
y=3
Call proc（x,y）
Label1.Caption=x
Label2.Caption=y
End Sub
程序运行后，单击命令按钮，两个标签中显示的内容分别是__________。
A、25和3 B、25和6
C、5和6 D、5和3
26．在窗体上画一个命令按钮（名称为Command1），然后编写如下事件过程：
PrivateSubCommand1_Click（）
Dimbasinteger
b=b+1
EndSub
运行程序，第3次单击命令按钮后，变量b的值为___________。
A、1 B、3
C、0 D、2
27、阅读程序：
Function p1（a As Integer）
Static b
b = b + 1
p1 = a * b
End Function
Private Sub command1_click（）
Dim a As Integer
升级会员 