……………… … … … … … … … … 线 :…级…班…业专…… … … … … … … … … :院…学 …) 题封 … 答… 不… 内… 线… … 封… 密… (… … … :号…学… … … … … … 密 … …:名…姓………………………………… …（本科）试卷（A卷）
2013-- 2014 学年第 二 学期
《VB》试卷
题序 一 二 三 四 五 六 七 八 总 分 得分 评卷人 注意：请务必在答题卡上作答。
一、选择题（ 共 40 分，每题 1 分）
得分 1．Visual Basic 是一种面向对象的可视化程序设计语言，采取了______的编程机制。
A、事件驱动
B、按过程顺序来执行 C、从主程序开始执行
D、按模块顺序执行
2．Visual Basic 是一种面向对象的程序设计语言，_________不是面向对象系统所包含的三要素。 A、变量 B、事件 C、方法
D、属性
3．为了保存一个Visual Basic应用程序，应当________。 A、只保存工程文件（.vbp）
B、分别保存工程文件、窗体文件和标准模块文件 C、分别保存工程文件和标准模块文件（.bas） D、只保存窗体模块文件（.frm）
4．为了使窗体右移200（twip），应使用的语句是_______。 A、 Form1.Move Width+200 B、 Form1.Move 200
C、 Form1.Move Form1.Height+200 D、 Form1.Move Left+200
5．VB的一个应用程序至少包含一个_________文件，该文件存储窗体上使用的所有控件对象和有关的_______、对象相应的________过程和______代码。 A、模块、方法、事件、程序 B、窗体、属性、事件、程序 C、窗体、程序、属性、事件
D、窗体、属性、事件、模块
6．有程序代码如下： text1.text=\
则text1、text、\分别代表_________。
_____________ ________ A、对象、值、属性 C、对象、属性、值
B、对象、方法、属性 D、属性、对象、值
7．若要设置文本框中所显示的文本颜色，应设置_________属性的值 A、Color
B、FillColor D、ForeColor
C、BackColor
8．当运行程序时，系统自动自动执行启动窗体的_________事件过程。 A、Load C、UnLoad
B、Click D、GotFocus
9．设a=10，b=5，c=1，执行语句print a>b>c后，窗体上显示的是___________。 A、False C、True
B、出错 D、1
10．函数String（2,\）的值是_______。 A、\ C、\
B、\ D、 \
11．以下语句的输出结果是_______。
Print Format $（32548.5,\） A、32,548.5 C、32548.5
B、032,548.50 D、32,548.50
12．InputBox函数返回值的类型为_____。 A、数值
B、字符串
C、数值或字符串（视输入的数据而定） D、变体 13．当Visual Basic执行下面语句后，A的值为_______ A=1
If A>0 then A=A+1 If A>1 then A=0 A、3 C、1
B、2 D、0
14．假定有下面的情况语句：
Select case x
为了确定x的绝对值大于5，正确的Case子句为________。 A、Case -5 to 5
B、Case abs（x）>5 D、Case Is< -5,Is>5
C、Case Not（-5 to 5）
15．以下程序段的输出结果为___________。 x=1 y=4 do until y>4 x=x*y y=y+1
loop print x A、8 C、1
B、20 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 C、1*3*5*...*19
B、1+1*3+1*3*5+...+1*3*5*...19
D、1!+3!+5!+...+19!
17．执行下列程序，从键盘输入10，运行结果是_______。 Private Sub Command1_Click（）
S=InputBox（\请输入一个数字：\） Select Case S Case Is>0 Print \ Case Is>3 Print \ Case Is>5
Print \End Select End Sub
A、>3 C、出错
B、>0 D、>5
18．下面程序段的运行结果为： For i=3 to 1 step -1 Print Spc（5-i）; For j=1 to 2*i-1 Print “*”; Next j
print Next i A、 *
B、 *****
C、 *****
D、 *****
*** *** *** ***
***** * * *