VB考题

北 京 交 通 大 学

xx-xx 学年第x学期《图形与图像处理》期末考试试卷（B）

（附参考答案）

学院 理学院 专业 信科 班级 学号 姓名_____________

请注意：如试卷有不对，请与监考老师调换试卷！

一、填空题（每题2分，共30分）

1．创建一个VB应用程序三个主要的步骤是__________________、________________和

_____________________。 2．当程序运行时，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的__________窗口中，把此文本框的_____________属性设置成空白。

3．Label和TextBox控件用来显示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使用___________控件；若允许用户输入文本，则应使用_____________控件。 4．窗体的常用方法有__________、___________、___________和___________。

5．要想在代码中给名为txtshow的文本框赋予文本：GOOD WORK ，应当编写的语句是

____________________________________。

6．若命令按钮的名称为Cmdopen，程序要求单击该命令按钮时，打开一个窗口frm1，请对以下事件过程填空。

Private Sub Cmdopen_ ___________ _____________________ End Sub

7．Visual Basic 的6种类型的表达式是______________、______________、______________、________________、_________________、____________________。Visual Basic根据表达式的___________来确定表达式的类型。 8．表达式93 \ 7 Mod 2 ^ 2 的值是___________。

VB考题

9．已知a=3，b=4，c=5，表达式a>b and Not c>a Or c>b And c<a+b的值是_________。表达式c>a And Not b<c的值是___________。

10．日期表达式 #2/24/02# - #2/12/02# 的值为___________。

11．数学表达式sin2x+ 写成等价的Visual Basic表达式为_________________。 12．设某个程序中要用到一个二维数组，要求数组名为A，类型为字符串类型，第一维下标

从1到5，第二维下标从-2到6，则相应的数组声明语句为___________________________。

13．事件就是在对象上所发生的事情，Visual Basic中的事件如___________、___________、

______________等。一个对象响应的事件可以有_____个，用户不能建立新的事件。事件过程是指_____________________________________________。假设某一事件过程如

下：

Private Sub cmd1_Click() Form1.Caption="VB示例" End Sub

则响应该过程的对象名是______________，事件名是_____________。

14．对象的方法用于__________________。当方法不需要任何参数并且也没有返回值时，调

用对象的方法的格式为________________，例如，对窗体Form1使用Show方法，应写成_________________。

15．PictureBox控件可通过设置其__________属性为True使之可自动调整大小；而Image

控件可通过设置其___________属性为True，使其加载的图片能自动调整大小以适应Image。

二、单项选择题（每题1分，共10分）

1．下列控件中没有Caption属性的是（ ）

A、标签 B、文本框 C、框架 D、命令按纽 2．除框架外，能对单选按纽分组的控件是（ ）。

A、窗体 B、标签 C、图片框 D、图像 3．下列符号不能作为VB中变量名的是（ ）。

A 、 ABCDEFG B、 P00000 C、 89YWDDF D、xyz 4． 下列不属于Visual Basic数据文件的是（ ）。

A、顺序文件 B、随机文件 C、二进制文件 D、数据库文件

5．若要求从文本框中输入密码时在文本框中只显示*号，则应用在此文本框的属性窗口中设

置（ ）。

A、Text属性值为* B、Caption属性值为* C、Password属性值为空 D、PasswordChar属性值为*

VB考题

6．表达式2*3^2+2*8/4+3^2的值为（ ）。

A、64 B、31 C、49 D、42 7．表达式mid("abcdefg",3,2)的值是（ ）

A、abc B、cd C、bcd D、abcde 8．数学表达式Sin25°写成VB表达式是（ ）。

A、Sin25 B、Sin（25）

C、Sin（25°） D、Sin（25*3.14/180）

9．Sub过程与 Function过程最根本的区别是（ ）。

A、Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以。 B、Function过程可以有参数，Sub过程不可以。 C、两种过程参数的传递方式不同。

D、Sub过程的过程名不能返回值，而Function过程能够通过过程名返回值。

10．选拔身高T超过1.7米且体重W小于62.5公斤的人，表示该条件的布尔表达式为（ A、T>=1.7 And W<=62.5 B、T<=1.7 Or W>=62.5 C、T>1.7 And W<62.5

D、T>=1.7 Or W<62.5

三、指出下列句中的错误，修改或者说明原因（每题2分，共20分）

1．sum和int.sum都可以作为VB的变量名。 2．变量名的长度最长可达1024个字符。 3．下列程序运行结果：3，3

Option Explicit

Private Sub Command1_Click() Dim a，b As Integer a = 3.6 b = 3.6

Text1.Text = a Text2.Text = b End Sub

4．程序可以改变定长字符串的内容和长度。

5．Variant是一种特殊的数据类型，可以包含任何种类型的数据。 6．下列程序运行结果为True

Private Sub Command1_Click() a = 1 b = 2 c = 3

）

VB考题

Text1.Text = c > a + b Or b - 1 > c - 1 And c + a > a Xor b < c - 2 End Sub

7．#12/31/1999# - #12/20/1999#的运算结果是#12/11/1999# 8．可以在窗体的通用部分声明静态变量。

9．使用声明语句建立一个变量后，Visual Basic会自动对数值类型的变量赋初值0，变长的

字符串被初始化为一个零长度的字符串""，定长字符串用空格填充，Variant变量被初

始化为 Empty，布尔型的变量被初始化为False。

10．事件过程通常由事件驱动执行，而Sub过程通过过程调用执行。

四、读程序题，写出程序运行结果（每题5分，共20分）

1．Private Sub Form_Click() For I = 1 To 9

For j = 1 To 30 - 3 * I

Print " "; Next j

For k = 1 To I Print k;

Next k

For k = I - 1 To 1 Step -1

Print k; Next k Print Next I End Sub

2．Option Explicit

Private Sub Command1_Click() Static S As Integer Dim i As Integer S = 1

For i = 1 To 5 S = S * i Next i Print S End Sub

3．For X = 5 To 1 Step -1 For Y = 1 To 6 - X

Print Tab(Y + 5); "*"; Next Y Print Next X

VB考题

4．Private Sub Form_Activate() Print "aa" & "bb",-5 * 6,Not 2 <= 3 Print "aa" & "bb"; -5 * 6; Not 2 <= 3 Print

Print "30+60", Print 30 + 60 ？

？"30+60"; 30 + 60 End Sub

五、编程题（每题10分，共20分）

1．设计程序。要求：从文本框Text1中接收输入的数据，当单击确定按钮（command1）时，如果该数据满足条件：除以3余2，除以5余3，除以7余4，则输出；否则将焦点定位在文本框Text1中，选中其中的文本。

2．任意输入3个数，求大小排第二的那个数，写出程序代码。

【附：参考答案】

一、填空题

1．创建应用程序界面 设置属性 编写代码 2．属性、text

3．Label TextBox

4．Load方法 Show方法 Hide方法 Unload方法 5．txtshow.text="GOOD WORK" 6．Click()、frm1.show

7．算术表达式 字符串表达式 关系表达式 布尔表达式 日期表达式 对象表达式 运算符 8．1

9．True False 10．12

11．Sin(x) ^ 2 + Sqr(x ^ 2 - y ^ 2) / (2 * x)

12．Dim A(1 To 5，-2 To 6) As String

13．单击 双击 装载 多 响应某个事件后所执行的程序代码 cmd1 Click 14．完成某种特定的功能 对象名.方法名 Form1.Show 15．AutoSize Stretch

二、单项选择题

1．B 2．C 3．C 4．D 5．D 6．B 7．B 8．D 9．D 10．C

VB考题

三、指出下列句中的错误，修改或者说明原因。 1．int.sum 不正确。变量名中不能包括小数点。 2．变量名的长度最长可达255个字符。 3． 3.6 ， 4

因为a 不是整型变量。

4．不正确。程序不可以改变字符的长度，这是VB规定。

5．不完全正确。Variant是一种特殊的数据类型，除了定长字符串数据及用户定义类型外，可以包含任何种类型的数据，这是VB规定。

6．False 。逻辑表达式计算结果。

7．不正确。两个日期型数据相减，其结果是一个数值型数据。 8．不正确。静态变量为局部变量，只能在过程中声明。 9．正确。 10．正确。 11．正确。

12．不正确。该属性设为Ture时，Image控件不能自动调整自己的尺寸与显示的图片匹配，而可以使图片自动扩展以适应控件的尺寸。 四、读程序题，写出程序运行结果。 1．程序运行后，单击窗体，输出结果为： 1

1 2 1

1 2 3 2 1

1 2 3 4 3 2 1

1 2 3 4 5 4 3 2 1

1 2 3 4 5 6 5 4 3 2 1

1 2 3 4 5 6 7 6 5 4 3 2 1 1 2 3 4 5 6 7 8 7 6 5 4 3 2 1

1 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 1

2．程序运行后，单击按钮Command1，输出结果为：120。 3. * ** *** **** ***** 4.

aabb -30 False aabb-30 False

30+60 90 30+60 90 5.

11139

五、编程题 1．

Private Sub Command1_Click()

VB考题

x = Val(Text1.Text)

If x Mod 3 = 2 And x Mod 5 = 3 And x Mod 7 = 4 Then Print x Else

Text1.SetFocus

Text1.SelStart = 0

Text1.SelLength = Len(Text1.Text) End If

End Sub 2．

a = Val(InputBox("输入第一个数：")) b = Val(InputBox("输入第二个数：")) c = Val(InputBox("输入第三个数：")) If a < b Then t = a: a = b: b = t If a < c Then t = a: a = c: c = t If b < c Then t = b: b = c: c = t MsgBox ("求大小排第二的数是：" & b)