VB程序设计期末模拟试题及答案

VB程序设计期末模拟试题及答案

第一篇：VB程序设计期末模拟试题及答案

《VB》期末复习题及答案

综合复习题

一、填空题

1．创建一个VB应用程序三个主要的步骤是__创建应用程序界面

_、_设置属性_和_编写代码_。2．当程序运行时，要求窗体中的文本

框呈现空白，则在设计时，应当在此文本框的 属性 窗

口中，把此文本框的__text__属性设置成空白。

3．Label和TextBox控件用来显示和输入文本，如果仅需要让应

用程序在窗体中显示文本信 息，可使用___Label_____控件；若允许用

户输入文本，则应使用___TextBox___控件。4．窗体的常用方法有

_Load方法 Show方法 Hide方法 Unload方法 5．要想在代码中给名

为txtshow的文本框赋予文本：GOOD WORK，应当编写的语句是

=“GOOD WORK” 6．若命令按钮的名称为Cmdopen，

程序要求单击该命令按钮时，打开一个窗口frm1，请对以

下事件过程填空。

Private Sub Cmdopen_ Click()、 End Sub 7．Visual

Basic 6种类型的表达式是 算术表达式 字符串表达式 关系表达式 布尔

表达式 日期表达式 对象表达式，Visual Basic根据表达式的_运算符来

确定表达式的类型。8．表达式93 7 Mod 2 ^ 2 的值是___________。

9．已知a=3，b=4，c=5，表达式a>b and Not c>a Or c>b

And c

达式c>a And Not b

10．日期表达式 #2/24/02#1 > c2 End Sub 7．#12/31/1999#3

* I Print “ ”;Next j For k = 1 To I Print k;Next k For k = IX Print

Tab(Y + 5);“*”;Next Y Print Next X 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 5． X=1 Do While X<=10 If X

Mod 7 =0 Then Y = X + 6 Else Z = X End If X = X + 2 Loop Print

X,Y,Z

五、编程题

1．设计一个计算程序。该程序用户界面如图所示，由四个文本框：

文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框

4（text4），和三个按钮：命令按钮1（command1）、命令按钮2

（command2）、命令按钮3（command4）组成。程序运行后，用

户单击清除按钮，则清除文本框中显示的内容。单击计算按钮，如果

成绩填写不完全，则给出提示信息，否则计算三科平均成绩。单击退

出按钮则退出。

2．设计程序。要求：从文本框Text1中接收输入的数据，当单击

确定按钮（command1）时，如果该数据满足条件：除以3余2，除

以5余3，除以7余4，则输出；否则将焦点定位在文本框Text1中，

选中其中的文本。

3．设计一个欢迎程序。该程序用户界面如图所示。要求程序运行

后，用户选中粗体复选框时，标签（Label1）中的文字（欢迎您！）

的字体变成粗体，用户选中斜体复选框时，标签的字体变成斜体。若

取消选中，则恢复原字体。单击结束，则退出。4．任意输入3个数，

求大小排第二的那个数，写出程序代码。

第二篇：VB程序设计期末模拟试题及答案

0 《VB》期末复习题及答案

综合复习题

一、填空题

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 的值是___________。

9．已知a=3，b=4，c=5，表达式a>b and Not c>a Or c>b

And ca And Not b c2 End Sub 7．#12/31/1999#3 * I Print

“ ”;Next j For k = 1 To I Print k;Next k For k = IX Print Tab(Y +

5);“*”;Next Y Print Next X 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 5． X=1 Do While X<=10 If X

Mod 7 =0 Then Y = X + 6 Else Z = X End If X = X + 2 Loop Print

X,Y,Z

五、编程题

1．设计一个计算程序。该程序用户界面如图所示，由四个文本框：

文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框

4（text4），和三个按钮：命令按钮1（command1）、命令按钮2

（command2）、命令按钮3（command4）组成。程序运行后，用

户单击清除按钮，则清除文本框中显示的内容。单击计算按钮，如果

成绩填写不完全，则给 4

出提示信息，否则计算三科平均成绩。单击退出按钮则退出。

2．设计程序。要求：从文本框Text1中接收输入的数据，当单击

确定按钮（command1）时，如果该数据满足条件：除以3余2，除

以5余3，除以7余4，则输出；否则将焦点定位在文本框Text1中，

选中其中的文本。

3．设计一个欢迎程序。该程序用户界面如图所示。要求程序运行

后，用户选中粗体复选框时，标签（Label1）中的文字（欢迎您！）

的字体变成粗体，用户选中斜体复选框时，标签的字体变成斜体。若

取消选中，则恢复原字体。单击结束，则退出。4．任意输入3个数，

求大小排第二的那个数，写出程序代码。《VB》期末复习参考答案

一、填空题

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

3．Label TextBox 4．Load方法 Show方法 Hide方法 Unload方法

5．=“GOOD WORK” 6．Click()、 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．完成某种特

定的功能 对象名.方法名 15．AutoSize Stretch

16．FileCopy “c:”，“d:”

二、单项选择题

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

12．A 13．C

三、指出下列句中的错误，修改或者说明原因。1． 不正

确。变量名中不能包括小数点。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.* **

*** **** ***** -30 False aabb-30 False 30+60 90 30+60 90

5.11 13 9

五、编程题 1．

Private Sub Command1_Click() = “"

= ”“ = ”“ = ”“ End Sub Private Sub

Command2_Click()a = Trim()b = Trim()c =

Trim()If a = ”“ Or b = ”“ Or c = ”“ Then MsgBox ”

成绩填写不完全！“, vbCritical Else =(Val(a)+ Val(b)+

Val(c))/ 3 6

End If End Sub Private Sub Command3_Click()Unload Me End

Sub 2．

Private Sub Command1_Click()x = Val()If x Mod 3 =

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

us rt = 0 gth =

Len()End If End Sub 3．

Private Sub Check1_Click()If = 1 Then

= True Else = False End If End

Sub Private Sub Check2_Click()If = 1 Then

= True Else = False End If End

Sub Private Sub Command1_Click()Unload Me End Sub 4．

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)

第三篇：可视化程序设计(VB)模拟试题

可视化程序设计（VB）

一、填空题（32分，共 8 题，每小题 4 分）

1.要使用通用对话框控件，必须首先在“部件”对话框中选择

______，将其添加到工具箱中。

2.运行时，要使工具栏Toolbarl中索引值为4的按钮无效（变成

灰色），应使用语句： ______。

3.运行时，要使工具栏控件Toolbarl中的第二个按钮的按钮菜单

中的第三项无效（变成灰色），应使用语句： ______。

4.在用手工方式设计工具栏时，可以设置工具按钮的 ______ 属性

为其添加功能提示。

5.用户自定义类型中的元素类型可以是字符串，但该字符串必须

是 ______。

6.设a=sqr（2）*sqr（3），下列语句的输出结果分别是。print

format$（a，“000.00”）

print format$（a，“###.#00”）

print format$（a，“00.00E+00”）

print format$（a，“－#.####”）

7.如果需要将窗体载入内存却不显示，需要将该窗体的 ______ 属

性设置为False，再用 ______ 语句装载。

8.随机产生一个范围是(100，300）的整数，表达式为 ______。

二、程序阅读题（24分，共 3 题，每小题 8 分）

1.写出下列事件过程的执行结果。

Private Sub Command1_Click()

s3(1)s3(1)

End Sub

Private Sub s3(ByVal a As Integer)

Dim x As Integer Static y As Integer

x=x+a

y=y+a

Print “x=”;x, “y=”;y

End Sub

2.下列标准模块和窗体模块的功能是给通信录文件“d:”

添加新记录，在横线上填上适当内容。

标准模块：

Type txr num As Integer name As String * 10 tel As String * 8

addr As String * 20

End Type

窗体模块：

Private Sub Command1_Click()

Dim n%, zgr As txr Open “d:”

For Random As #1

Len = Len(zgr)

= InputBox(“输入新职工编号：”)

= InputBox(“输入新职工姓名：”)

= InputBox(“输入新职工电话号码：”)

= InputBox(“输入新职工住址：”)

n =(1)(2)

Close #1

End Sub

3.本程序有一个标准模块和一个窗体模块。Sub main过程是本程

序的启动过程，其他过程是窗体模块的事件过程。执行本程序，写出

依次单击命令按钮commandl和command2，在窗体上分别输出的

3行结果。

标准模块：

Public X As Integer Sub main（）

X＝5

X

End Sub

窗体模块

Dim y As Integer

Private Sub command1_click（）

y＝X*2

Print y

End Sub

Private Sub command2_click（）

y＝X／2 Print y

End Sub

三、问答题（24分，共 3 题，每小题 8 分）

坐标系中旋转什么方向是正向

2.什么是“内外循环交叉”？

函数和Date函数有何区别？

四、程序设计题（20分，共 1 题，每小题 20 分）

利用随机函数，模拟投币结果。设共投币100次，求“两个正

面”、“两个反面”、“一正一反”3种情况各出现多少次？

答案：

一、填空题（32分，共 8 题，每小题 4 分）

1.参考答案：

Microsoft Common Dialog Controls 6.0

解题方案：

评分标准：

2.参考答案：

Toolbarl．Buttons（4）．Enabled＝False

解题方案：

评分标准：

3.参考答案：

Toolbarl．Buttons（2）．ButtonMenus（3）．Enabled＝

False

解题方案：

评分标准：

4.参考答案：

ToolTipText

解题方案：

评分标准：

5.参考答案：

定长字符串

解题方案：

评分标准：

6.参考答案：

002.45、2.449、24.49E-01、－2.4495

解题方案：

评分标准：

7.参考答案：

Visable；Load

解题方案：

评分标准：

8.参考答案：

+ Rnd * 200

解题方案：

评分标准：

二、程序阅读题（24分，共 3 题，每小题 8 分）

1.参考答案：

执行结果为： x=1 y=1 x=1 y=2

解题方案：

过程调用

评分标准：

2.参考答案：

(1)LOF(1)/ Len(zgr)+ 1(2)Put #1, n, zgr

解题方案：

标准模块和窗体模块应用

评分标准：

3.参考答案：

执行结果为： 5 10 2

解题方案：

区别标准模块与窗体模块

评分标准：

6三、问答题（24分，共 3 题，每小题 8 分）

1.参考答案：

在VB坐标系中，逆时针方向为正，各绘图方法都参照此坐标系。

计算对象的坐标点时务必注意这一点。

解题方案：

评分标准：

2.参考答案：

循环嵌套时，内外循环交叉。

For i＝1 ito 4

For j= 1 to 5 „

Next i

Next j

上述循环的交叉，运行时显示“无效的Next控制变量引用”。外

循环必须完全包含内循环，不得交叉。

解题方案：

评分标准：

3.参考答案：

Now函数和Date函数都是求当前机器内日期，不同之处是Now

函数除日期外还带回时间。

解题方案：

时间函数

评分标准：

四、程序设计题（20分，共 1 题，每小题 20 分）

0.参考答案：

Private Sub Form_Click()

Randomize Timer

Dim a(1, 1)

For i=1 To 100

n1=Int(Rnd*2)

n1=Int(Rnd*2)

a(n1, n2)=a(n1, n2)+1

Next i

Print “投币结果如下：”

Print “ ～～～～～～～～～～～～～”

Print “ 两个正面的次数为：”;a(0, 0)

Print “两个反面的次数为:”;a(1, l)

Print “一正一反的次数为:”;a(0, 1)+ a(1, 0)

End Sub

解题方案：

使用循环控制设计算法 评分标准：

循环5分，算法5分

第四篇：《vb程序设计》期末复习题及答案范文

《vb程序设计》期末复习题及答案

一、填空题

1．创建一个VB应用程序三个主要的步骤是_(创建应用程序界面)、

_(设置属性_)和_(_编写代码__)__。

2．当程序运行时，要求窗体中的文本框呈现空白，则在设计时，

应当在此文本框的__属性________窗口中，把此文本框的

____text_________属性设置成空白。

3．Label和TextBox控件用来显示和输入文本，如果仅需要让应

用程序在窗体中显示文本信息，可使用___label________控件；若允许

用户输入文本，则应使用__textbox___________控件。4．窗体的常用

方法有_load方法 Show方法 Hide方法_ Unload方法_。

5．要想在代码中给名为txtshow的文本框赋予文本：GOOD

WORK，应当编写的语句是_（=“GOOD WORK”_）。

6．若命令按钮的名称为Cmdopen，程序要求单击该命令按钮时，

打开一个窗口frm1，请对以下事件过程填空。Private Sub

Cmdopen_ _click()__________ __ End Sub 7．Visual Basic

6种类型的表达式是_（算术表达式_）（字符串表达式）（关系表达式）

（布尔表达式）（日期表达式）（对象表达式）。Visual Basic根据表

达式的_．1 _运算符__来确定表达式的类型。

8．表达式93 7 Mod 2 ^ 2 的值是___________。

9．已知a=3，b=4，c=5，表达式a>b and Not c>a Or c>b

And ca And Not b

10．日期表达式 #2/24/02#y ^ 2)/(2 * x)___。

12．设某个程序中要用到一个二维数组，要求数组名为A，类型

为字符串类型，第一维下标从1到5，第二维下标从-2到6，则相应的

数组声明语句为_（Dim A(1 To 5，-2 To 6)As String）_。13．事件

就是在对象上所发生的事情，Visual Basic中的事件如__单击_________、

_双击__________、_装载_____________等。一个对象响应的事件可以有_

多____个，用户不能建立新的事件。事件过程是指_（响应某个事件后

所执行的程序代码）_。假设某一事件过程如下：

Private Sub cmd1_Click()n=“VB示例” End

Sub 则响应该过程的对象名是_cmd1_____________，事件名是

_____click________。

14．对象的方法用于(_完成某种特定的功能__)。当方法不需要任

何参数并且也没有返回值时，调用对象的方法的格式为_(对象名.方法

名)_，例如，对窗体Form1使用Show方法，应写成

_________________。

15．PictureBox控件可通过设置其(autosize)__属性为True使之

可自动调整大小；而Image控件可通过设置其_(stretch_)__属性为

True，使其加载的图片能自动调整大小以适应Image。

16．在Visual Basic程序中实现复制文件“c:”到

d:盘根目录下的语句为FileCopy “c:”，

“d:”_。

二、单项选择题

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

A、标签 B、文本框 C、框架 D、命令按纽 2．除框架外，能对单

选按纽分组的控件是（C）。A、窗体 B、标签 C、图片框 D、图像

3．下列符号不能作为VB中变量名的是（C）。

A、ABCDEFG B、P00000 C、89YWDDF D、xyz 4． 下列不属

于Visual Basic数据文件的是（D）。A、顺序文件 B、随机文件 C、

二进制文件 D、数据库文件

5．若要求从文本框中输入密码时在文本框中只显示*号，则应用

在此文本框的属性窗口中设置（D）。

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

为空 D、PasswordChar属性值为* 6．表达式2*3^2+2*8/4+3^2的

值为（B）。A、64 B、31 C、49 D、42 7．表达式

mid(“abcdefg”,3,2)的值是（B）A、abc B、cd C、bcd D、abcde

8．数学表达式Sin25°写成VB表达式是（D）。A、Sin25 B、Sin

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

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

程可以使用Call语句或直接使用过程名调用，而Function过程不可

以。

B、Function过程可以有参数，Sub过程不可以。C、两种过程参

数的传递方式不同。

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

程名返回值。

10．选拔身高T超过1.7米且体重W小于62.5公斤的人，表示

该条件的布尔表达式为（C）

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 11.下列对象不能响应 Click事

件的是（D）A、列表框 B、图片框 C、窗体 D、计时器

12．在Visual Basic中，按文件的访问方式不同，可以将文件分

为（A）

A、顺序文件、随机文件和二进制文件 B、文本文件和数据文件

C、数据文件和可执行文件 D、ASCⅡ文件和二进制文件

13．将通用对话框CommonDialog的类型设置成“颜色”对话

框，可调用该对话框的（C）方法。

A、ShowOpen B、ShowSave C、ShowColor D、ShowFont

三、指出下列句中的错误，修改或者说明原因。1．sum和

都可以作为VB的变量名。(X)2．变量名的长度最长可达1024

个字符。(255)3．下列程序运行结果：3，3 Option Explicit Private

Sub Command1_Click()Dim a，b As Integer Dim a as integer ,b

as integer a = 3.6 b = 3.6 = a = b End Sub

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

5．Variant是一种特殊的数据类型，可以包含任何种类型的数

据。．不完全正确。Variant是一种特殊的数据类型，除了定长字符串

数据及用户定义类型外，可以包含任何种类型的数据，这是VB规定。

6．下列程序运行结果为True Private Sub Command1_Click()a

= 1 b = 2 c = 3 = c > a + b Or b1 And c + a > a Xor b

< c#12/20/1999#的运算结果是#12/11/1999# 8．可以在窗体的通

用部分声明静态变量。

不正确。静态变量为局部变量，只能在过程中声明。

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

型的变量赋初值0，变长的字符串被初始化为一个零长度的字符串“"，

定长字符串用空格填充，Variant变量被初始化为 Empty，布尔型的变