内容发布更新时间 : 2024/11/14 21:49:20星期一 下面是文章的全部内容请认真阅读。

……………… … … … … … … … … 线 :…级…班…业专…… … … … … … … … … :院…学 …) 题封 … 答… 不… 内… 线… … 封… 密… (… … … :号…学… … … … … … 密 … …:名…姓………………………………… …（本科）试卷（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、 *****

*** *** *** ***

***** * * *