文档库

最新最全的文档下载
当前位置:文档库 > 西南科技大学VB期末复习题3

西南科技大学VB期末复习题3

201102《VB程序设计语言》期末考试题

(参考样题)

一.判断题(10*2分=20分)

1. Visual Basic程序开发的特点是面向对象的事件驱动。(T)

2. Print_Text是一个不合法的变量名。(F)

3. 窗体的AutoRedraw属性实现了屏幕图像的重建。(T)

4. 设置字体大小应使用Font属性。(F)

5. Sub过程可以实现嵌套调用(T)

6. IIF函数中的三个参数都不能省略。(T)

7. 块结构条件语句以End If结束,而单行结构条件语句没有End IF。(T)

8. 当终值小于初值时,步长为负数。(T)

9. 执行While-Wend循环时,如果一开始条件就不成立,则语句块一次也不会执行。(T)

10. 关于数组的引用,在程序中,凡是简单变量可以出现的地方都可以出现数组元素的引用。(T)

二.单项选择题(10*2分=20分)

1.Print Format(123,“####”)执行之后的结果为(B)。

A、#123

B、123

C、123#

D、####

2.下面可以表示注释语句开头的为(C)。

A、Re

B、R

C、Rem

D、dim

3.下列选项中窗体载入事件为(A)。

A、Load事件

B、Click事件

C、DblClick事件

D、Unload事件4.Timer控件可以使用下列哪种事件(B)。

A、Click事件

B、Timer事件

C、Dblclick事件

D、Change事件5.要添加一个标准模块,可使用“(C)”菜单中的“添加模块”命令。

A、文件

B、视图

C、工程

D、工具

6.语句Dim arr(-3 To 5, 2 To 6) As Integer定义的数组元素有(A)个。

A、45

B、40

C、11

D、54

7.Visual Basic的特点不包括下面的(A)。

A、不需编程

B、面向对象的程序设计

C、可视化程序设计

D、时间驱动的程序设计

8.在顺序文件中,当使用Write#语句时,文件打开的方式必须是(B)。

A、Output和Input

B、Output和Append

C、Output

D、Append

9.Visual Basic 的数组下标默认为(B)。

A、1

B、0

C、2

D、用户指定

10.在语句“Print a;”中“;”实现的功能为(A)。

A、紧凑输出格式

B、格式输出格式

C、标准输出格式

D、以上说法不正确

三.程序阅读题(2*4*2.5分=20分)

1.阅读下列程序1:

Option Base 1

Private Sub Form_Click()

Dim a As Variant, b As Variant

Dim c(7) As Integer

a = Array(2, 8, 7, 6, 4, 26, 24)

b = Array(79, 27, 32, 40, 57, 66, 82)

Print "两组相加结果数值:";

L1:For i = 1 To 7

c(i) = a(i) + b(i)

Print c(i);

Next i

End Sub

1)以下关于语句“Option Base 1”的说法中正确的是(B)

A、其功能是指定数组下标上界的缺省值为1

B、其功能是指定数组下标下界的缺省值为1

C、其功能是定义动态数组

D、其功能是定义静态数组

2)对于以上程序中的array函数,下列说法正确的是(D)

A、可以用来对动态数组赋值

B、可以用来对多维数组赋值

C、只能用来对静态的多维数组赋值

D、只能用来对静态的一维数组赋值

3)该程序的功能是(B)

A、打印数组a和数组b

B、打印数组a与数组b的和

C、将数组a与数组b进行比较,打印出值大的元素

D、将数组a,b进行排序

4)L1行处的程序可以改为:(B)

A、for i=1 to lbound(c)

B、for i=1 to ubound(c)

C、for i=lbound(c) to 1 step –1

D、for i=7 to ubound(c) step -1

2、阅读下列程序2:

Private sub form1_click()

Dim a(3, 3) As Integer

For m = 1 To 3

For n = 1 To 3

a(m, n) = (m - 1) * 3 + n

Next n

Next m

For m = 2 To 3

For n = 1 To 2

Print a(m, n);

Next n

L1: print

Next m

End sub

1)在默认情况下,数组a(3,3)是(D)

A、一维数组,元素个数3+3个

B、二维数组,元素个数3×3个

C、一维数组,元素个数4+4个

D、二维数组,元素个数4×4个2)第一个双重循环的循环次数为(C)

A、3

B、6

C、9

D、16

3)程序运行后a(0,0)的值为(C )

A、10

B、5

C、0

D、不存在这样的数组元素

4)程序中L1行处Print语句的作用为(C)

A、退出内循环

B、打印循环变量

C、被打印对象每打印一行将换行

D、被打印对象每打印一行将空格

四.程序设计题(40分)

1、当单击“数据

西南科技大学VB期末复习题3

录入”按钮时能够用

INPUTBOX函数输入

6个数,并显示在第一

个文本框内;当单击

“排序”按钮时能够按

照比较交换排序法对

输入的数据进行从小

到大排序,并将排序后

的数显示在第二个文

本框内。程序界面如图

所示。(本题25分)

评分标准:

1、能够正确存盘5分

2、能够正确设计界面5分

3、能够正确使用循环和INPUTBOX函数对数组赋值5分

4、能够正确显示在第一个文本框中显示数据5分

5、能够正确排序10分

6、能够正确将排序后的字符显示在第二文本框中5分

7、程序结构清晰合理5分

参考代码:

Private Sub Command1_Click()

Dim x As Integer

Text1.Text = ""

For i = 1 To 6

a(i) = Val(InputBox("输入错误!"))

Text1.Text = Text1.Text & " " & a(i)

Next i

End Sub

Private Sub Command2_Click()

Text2.Text = ""

For i = 1 To 5

For j = i + 1 To 6

If a(i) > a(j) Then

t = a(i)

a(i) = a(j)

a(j) = t

End If

Next j

Next i

For i = 1 To 6

Text2.Text = Text2.Text & " " & a(i) Next i

End Sub