大学_vb期末考试试题
幼儿园案例-2013上海高考英语
VB期末考试试题 A卷
一、 填空题
1、VB程序设计的主要特点是 和 （2） 。
2、在VB中，最主要的两种对象是 （3） 和 （4） 。
3、工程是构成应用程序文件的 （5） 。
4、方法是VB提供的一种
（6） ，用来完成一定的操作。
5、浮点类型数据包括单精度型和___（7）__数据。
6、事件是窗体或控件对象识别的___（8）____。
7、可用窗体的___（9）_
方法在窗体中显示文字。
8、
复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡
的)中的某一种。
9、在VB中，修改窗体的 （11）和 （12）
属性值，可改变窗体的大
小。
10、双击工具箱中的控件图标，可在窗体的 （13）
出现一个尺寸为缺
省值的控件。
11、在MsgBox函数中，如果缺省title参数，则使用 （14）
作为消息
框的标题。
12、设x＝34.58，语句Print
Format(x,“000.0”)的输出结果是 （15） 。
13、在VB
中，数值型变量的初值为 （16） ，Varant型变量的初值为
（17）
，布尔型变量的初值为 （18） 。
14、设置窗体的 （19）
属性，可在窗体上显示图片。
15、程序运行工程中，清除MP图片框中的图片应使用语句
（20） 。
二、选择题
1、菜单控件只包括一个事件，即 （1） ，当用鼠标单
击或键盘选中后按
“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。
A、GotFocus B、Load C、Click
D、KeyDown
2、滚动条控件(如图所示)的Max属性所设置的是 （2） 。
A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值
B、
单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量
C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量
D、滚动条控件无该属性
3、SQL 语句 Select * Form student 中的 *表示
（3） 。
A、所有记录 B、所有字段 C、所有表 D、都不对
4、以下选项中，不属于标签的属性是 （4） 。
A、Enabled
B、Caption C、Default D、Font
5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 （5） 。
A、Caption B、Name C、Text
D、Label
6、设置一个单选按钮(OptionButton)所
代表选项的选中状态，应当在属性窗
口中改变的属性是 （6） 。
A、Caption B、Name C、Text
D、Value
7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？ （7）
。
A、在标题项中输入&，然后打勾 B、在索引项中打勾
C、在有效项中打勾 D、在复选项中打勾
8、当执行以下过程时，在窗体上将显示 （8） 。
Private Sub
Command1_Click( )
Print
Print
Print
End Sub
A、 VBHello!VB B、 VB
Hello!VB
C、 VB D、 VB
Hello! VB Hello!
VB
9、语句Print 的结果为 （9） 。
A、The answer is
204-2 B、The answer is 3
C、The answer
is 、非法语句
10、下列哪个控件是容器控件 （10） 。
A、Image B、Picture C、ComboBox
D、FileListBox
11、若要将窗体从内存中卸载出去，其实现的方法是
（11） 。
12、以下选项中，不是 Visual Basic控件的是 （12） 。
A.窗体 B.定时器 C.单选框 D.命令按钮
13、双击窗体中的对象后，Visual Basic将显示的窗口是 （13） 。
A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口
14、可决定窗体的左上角是否有控制菜单的属性是 （14） 。
lBox
ton
ton Style
15、设有如下语句：
Strl＝InputBox（输人，，练习）
从键盘上输人字符
“示例”后，Strl的值是 （15） 。
A．“输入” B．“ ”
C．“练习” D．“示例”
16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 （16） 。
A. Form1_Click _Click C. Frm1_Click
D. Me_Click
17、窗体的hide属性的含义是 （17） 。
A.隐藏 B.展现 C.装入
D.卸载
18、若要设置定时器控件的定时时间，需设置的属性是 （18） 。
A．Enabled B．Value C．Interval D．Text
19、能够改变复选框中背景颜色的属性是 （19） 。
A．Value
B．FontColor C．BackColor D．Font
20、窗体能响应的事件是 （20） 。
A．ActiveForm B．Load C．Drive
D．Change
三、判断题(判断下列正确与否，正确的打√，错误的打ⅹ。)
1、三种方式的组合框都允许用户输入哪些不在列表框中的选项。
2、图象框中的Stret
ch属性为true时，其作用是图形自动调整大小以适应图
象控件。
3、在菜单编辑器中使用“索引”时，可有一组菜单项具有相同的“名字”。
4、通过改变属性窗口中的Name属性，来改变窗体的标题。
5、创建VB应用程序的三个
主要步骤是：(1)创建应用程序界面(2)设置控件(3)
编写代码。
6、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常
量。
7
、已知P＝MsgBox(“Howareyou?，VbYesNo+VbQuestion，“Hello!
”)，变
量P是Integer数据类型。
8、工程文件的扩展名是 .vbg 。
9、VB允许设计和使用用户自己设计的控件。
10、OptionButton控件没有DblCliek事件。
11、同一条记录中的各数据具有相同的类型。
12、使用Data控件可以直接显示数据库中的数据。
13、ImageList
是一个图像容器控件，可用作工具栏的图像库。
14、当用户单击工具栏按钮时，将触发工具栏按钮的ButtonClick事件。
15、
在VB的工程资源管理器中，如果从工程中移除已经保存过的文件，该文
件仍然被物理删除（真正删除）
。
16、如果列表框的ListConut的属性为10，则列表框最后一项的ListIndex<
br>值为10。
17、要是某个命令按钮不起作用，应将该按钮的Enabeld属性设置为False。
18、使用数组定义语句：Dim D$$（10），则数组D中各元素的值为空。
19、如果在一行中输入多条语句，各语句之间用使用 ；分隔。
20、在代码窗口中输入某
行代码并按回车键之后，如果代码变成红色，说明该
行代码有语法错误。
四、读程序题，写出程序运行结果
1、 Private Sub
Form_Click()
Static SUM As Integer
I = 1
Do While I<=10
SUM = SUM + I
I = I + 1
Loop
Print SUM
End Sub
运行程序，第一次单击窗体：
第二次单击窗体：
2、 Private Sub
Form_Click()
Print
Print
For I = 15 To
16
Print I;
For j = 2 To 6 Step 3
Print Tab(3 * j); j * I;
Next j
Print
Next I
End Sub
程序运行结果：
五、编程题
（一）窗体中有图片框(Picture1)和计时器(Timer1)两个控件，运行程序
时，
将图片加载到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下脚移
动，每次向左
、向右移动100twip（20分之一像素）。请填空：
Private
Sub Form_load( )
（1）
=loadPicture(“c:”)
（2）
.Interval=200
End Sub
Private Sub Timer1_Timer( )
Static x , y As Integer
x=x+100
y=y+100
（3）
End Sub
（二）有一个单击按钮过程，其作用
是产生50个60～100的随机数，统计其
中被6整除余2的个数，并将这些数输出。请填空：
Private Sub Command1_Click()
Dim x As Integer, N%
Dim Counter
As Integer
(1) Timer
For N=1 To 50
X=Rnd()* (2)
If (3) =2 Then
Print x
Counter= (4)
(5)
Next N
Print Counter
End Sub
《VB程序设计与应用》参考答案
一、填空题
答案
题号
答案
题号
答案
题号
答案
二、选择题
答案
题号
答案
题号
答案
题号
答案
三、判断题
答案
答案
1
1
可视化设计
6
特殊子程序
11
2
事件驱动编程
7
3
窗体（form）
8
4
控件
9
5
集合
10
选中
15
34.6
20
Cls
5
A
10
B
15
D
20
B
8 9 10
双精度
12
动作
13
Print
14
高度
宽度(Width)
（Height）
16
0
1
C
6
D
11
D
16
C
2
3
17
中央
18
工程1
19
空
2
A
7
D
12
A
17
A
4
False
3
B
8
A
13
A
18
C
5 6
Picture
4
C
9
B
14
A
19
C
7
ХХХ√
14
Х√
16
√
17
√
18
√
19
Х
11 12 13 15 20
√ Х √ √ Х
Х √ Х Х √
四、程序阅读题：
（一） （10分）
1 、 55
2、
110
（二）、
（10分）
* 2 5
15
30 75
16 32 80
五、编程题
（20分）
（一）1、
e
2、
Timer1
3、 x ,y
(二) 1、
Randomize
2、
Rnd()*41+60
3、 x Mod
6
4、 Counter＋1
5 End If
大学VB期末考试试题 B卷
一、
填空题
1.ＶＢ中若要产生一消息框，可用（1）MsgBox函数来实现。
2．常量是指在程序运行过程中，（2）其值不能改变的的量。
3．整数类型数据分别包括整型和 （3）长整型 数据。
４、在ＶＢ集成开发环境
中，运行应用程序的方法有三种：一是（4）(单击
“运行”菜单下的启动；二是(5)
单击工具栏上的启动
按钮_；三是（6）按F5键
５、在ＶＢ中若要让某对对象获取焦点，则可通过（7） Setfocus 方法来实现。
6．列表框（ListBox控件）显示 （8） 项目列表
，用户可从中选
择一个或多个项目。
7．框架（Frame控件）可以用来
(9) 对其它控件 进行分组，以便
于用户识别，主要用于为单选按钮分组。
８、在ＶＢ中，用来描述对象外部特征的量称之为对象的（10）属性。
９、为使某窗口中的命令按钮“取消(C)”具有如下特性：按“Alt＋C”键或按
“ESC”
键，均可代替用鼠标单击该按钮的操作，应设置该按钮的Caption属性值为
（11）取消(&C)，并且设置其（12） Cancel属性值为（13）True 。
10、在过程内用（14）Static
声明的变量为静态变量，在执行一个过程结束时，
过程中所用到的
Static变量的值会保留，下次再调用此过程时，变量的初值是上
次调用结束时被保留的值。 <
br>11、在模块文件中的声明部分用Global或（15）public关键字声明的变量为全局
变量。
12、在模块文件中的声明部分用（16）Dim或（17）private定义的变量为模
块级
变量。
13．计时器控件通过定期激活Timer事件，使得Timer控件
（18） 可以每隔
一段时间 就执行一次Timer事件中的代码。
14．要获得滚动条的当前位置，可以访问通过 （19） value
属性
来实现。
15．关闭正在运行的VB窗口将自动触发的事件是 （20）
Unload。
二、选择题
1．工程文件的扩展名是（ B
）。
A．vbg
2.在以下窗体中没有采用的控件是（ B ）。
A.文本框 B 垂直滚动条
按钮
3．滚动条控件（如图所示）的Largechange属性所设置的是（ A ）
A．
单击滚动条和滚动箭头之间的区域时，滚动条控件Value属性值的改
变量
B．
滚动条中滚动块的最大移动位置
C． 滚动条中滚动块的最大移动范围
D． 滚动条控件无该属性
C．框架 D 命令
4、用于从字符串左边截取字符的函数是（ C ）
Ａ、Ltrim( )
Ｂ、Trim( ) Ｃ、Left( ) Ｄ、Instr( )
5、可获得当前系统日期的函数是 （ A ）
Ａ、Date( ) Ｂ、Time(
) Ｃ、IsDate( ) Ｄ、Year( )
6、退出For循环可使用的语句为（ A
）
Ａ、Exit For Ｂ、Exit Do Ｃ、End For Ｄ、End Do
7、窗体的标题栏显示内容由窗体对象的（D ）属性决定。
Ａ、BackColor
Ｂ、BackStyle Ｃ、Text Ｄ、Caption
8、程序运行时，若要通过回车
键调用某命令按钮的Click事件过程，则可设置
该命令按钮的（ C
）属性值为True来实现。
Ａ、Value Ｂ、Enabled
Ｃ、Default Ｄ、Cancel
9、当用户在窗体上单击鼠标时，不会触发的事件是（ D ）
Ａ、Click
Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick
10、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是 （ C ）
Ａ、工程资源管理器窗口 Ｂ、工具箱窗口 Ｃ、代码窗口 Ｄ、属性窗口
11、设a=“Visual Basic”，下面使b=“Visual”的语句是 （ D ）
Ａ、b=Left(a,8,12) Ｂ、b=Mid(a,8,5)
C、b=Rigth(a,6) D、b=Left(a,6)
12、若要使命令按钮不可用，则可设置其（ C ）属性为False来实现。
Ａ、Value Ｂ、Cancel Ｃ、Enabled Ｄ、Default
13．允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？（ C ）
A．在标题项中输入&然后打勾 B 在索引项中输入“√”
C．在复选项中输入“√” D 在有效项中输入“√”
14．当执行以下过程时，在窗体上将显示（ B ）。
Private Sub Commandl_Click( )
Print “VB”
Print“Hello!”；
Print “VB”
End
Sub
A. VB Hello! VB
B.
VB
Hello!VB
C. VB
Hello! VB
D. VB
Hello!
VB
15、以下不属于键盘事件的是（ C ）
Ａ、KeyDown
Ｂ、KeyUp Ｃ、Unload Ｄ、KeyPress
16、以下叙述中正确的是（ A ）
A、窗体的Name属性指定窗体的名称，用来标识一个窗体
B、窗体的Name属性的值是显示在窗体标题栏中的文本
C、可以在运行期间改变对象的Name属性的值
D、对象的Name属性值可以为空
17、图像框或图片框中显示的图形文件，由它们的（ B ）属性值决定。
Ａ、DownPicture Ｂ、Picture Ｃ、Image Ｄ、Icon
18、文本框的（ A ）属性用于设置或返回文本框中的文本内容。
Ａ、Text
Ｂ、(名称) Ｃ、Caption Ｄ、Name
19、复选框或单选钮的当前状态可通过（ B ）属性来返回或设置。
Ａ、Checked Ｂ、Value Ｃ、Selected Ｄ、Caption
20、VB提供（ C ）属性用于控制对象是否可用。
Ａ、Default
Ｂ、Cancel Ｃ、Enabled Ｄ、Visible
三、判断题(判断下列正确与否，正确的打√，错误的打ⅹ。)
１、设置属性的语句格式为：“对象名．属性名＝属性值”． （ ）
２、若用户在键盘上按下一个键，则会产生一个单击事件（ ）．
３、ＶＢ的赋值语句只能给变量赋值． （ ）
４、在ＶＢ中，字符型常量应使用＂＃＂号将其括起来．（ ）
５、窗体大小只能通过鼠标拖动窗体边框来设置．（ ）
6．在定义了一个函数后，可
以象调用任何一个VB内部函数一样使用它，即可以
在任何表达式、语句或函数中引用它。（
）
7．Visual Basic表达式为：1284+COS（28）（ ）
8．Visual Basic表达式为：3*cos (c+d)^2或3*cos
(c+d)*cos (c+d)( )
程序语言两个基本特点是：结构化和事件驱动编程。（ ）
10．工程资源管理器用于查看和管理工程类的文件，不能删除文件。（ ）
四、读程序题，写出程序运行结果
e Sub Form_Click(
)
Static Sum As Integer
For I=1 To
10
Sum= Sum+I
Next I
Print Sum
End Sub 55
e Sub
Form_Click ( )
Print
；Tab(9);3,Tab(18);6
Print
For I=15
to 16
Print I;
For j=3 To 6 Step
3
Print Tab(3*j);j*I;
Next j
Print
Next I
End Sub
e Function Fac(n As Integer)As
Integer
Dim f As Integer
f=f+n
Fac =f
End Function
Private Sub Form_Click( )
Dim I As Integer
For I=1 To 5
Print Σ；I & & Fac(I)
Next I
End
Sub
e Sub Command1_Click( )
=努力
End Sub
Private
Sub Command2_Click( )
=学习
End
Sub
单击Command2按钮，又单击Command1按钮，在文本框中显示什么？
五、编程题
1、在窗体上有一个文本框控件，名称
为TxtTime；一个计时器控件，名
称为Timer1。要求每一秒钟在文本框中显示一次当前的时
间。程序如下，请在
下划线上填入恰当的内容。
Private
Sub Timer1_ _____()
=_____
End Sub
2、在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：
Private Sub Command1_Click()
For a=1 To 4
For b=0 To a
Print Chr(65+a)
Next b
Print
Next a
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是什么？
3、在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Load()
=”计算机”
End Sub
Private Sub Text1_Change()
“等级考试”
End Sub
程序运行后，在文本框中显示的内容是
而在图片框中显示的内容是
填空题
（１）MsgBox函数 （２）其值不能改变 （３）长整型 （４）
单击“运行”菜单下的启动
（５）单击工具栏上的启动按钮 （６）按Ｆ
5键 （７）Setfocus
（８）项目列表 （９）对其它控件 （10）属性 （11）取消(&C)
（12）Cancel
(13) True （14）Static
（15）Public （16）Dim （17）private （18）
可以每隔一个时间段
（19）Value （20）Unload
二、选择题
1．B 2．B 3．A 4. A 5. A
6．A 7.
D 8. C 9. D 10. C
11. D 12. C
13. C 14. B 15.C
16. A 17. B 18. A
19. B 20 . C
三、判断题
1．√ 2.
3. √ 4. 在ＶＢ中，字符型常量应使用＂＂号将其括起
来． 5. 6.
7. 正确的形式是：1284+COS（28*3.14159180） 8. √9.
VB的两个基本特点是：可视化设计和事件驱动编程。 10.
四、读程序题，写出程序运行结果、
1． 结果为：55
2． 结果为：* 3 6
15 45 90
16
48 96
3． 结果为：
Σ1=1
Σ2=2
Σ3=3
Σ4=4
Σ5=5
4. 结果为：努力
VB期末考试试题 A卷
一、 填空题
1、VB程序设计的主要特点是 和 （2） 。
2、在VB中，最主要的两种对象是 （3） 和 （4） 。
3、工程是构成应用程序文件的 （5） 。
4、方法是VB提供的一种
（6） ，用来完成一定的操作。
5、浮点类型数据包括单精度型和___（7）__数据。
6、事件是窗体或控件对象识别的___（8）____。
7、可用窗体的___（9）_
方法在窗体中显示文字。
8、
复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡
的)中的某一种。
9、在VB中，修改窗体的 （11）和 （12）
属性值，可改变窗体的大
小。
10、双击工具箱中的控件图标，可在窗体的 （13）
出现一个尺寸为缺
省值的控件。
11、在MsgBox函数中，如果缺省title参数，则使用 （14）
作为消息
框的标题。
12、设x＝34.58，语句Print
Format(x,“000.0”)的输出结果是 （15） 。
13、在VB
中，数值型变量的初值为 （16） ，Varant型变量的初值为
（17）
，布尔型变量的初值为 （18） 。
14、设置窗体的 （19）
属性，可在窗体上显示图片。
15、程序运行工程中，清除MP图片框中的图片应使用语句
（20） 。
二、选择题
1、菜单控件只包括一个事件，即 （1） ，当用鼠标单
击或键盘选中后按
“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。
A、GotFocus B、Load C、Click
D、KeyDown
2、滚动条控件(如图所示)的Max属性所设置的是 （2） 。
A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值
B、
单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量
C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量
D、滚动条控件无该属性
3、SQL 语句 Select * Form student 中的 *表示
（3） 。
A、所有记录 B、所有字段 C、所有表 D、都不对
4、以下选项中，不属于标签的属性是 （4） 。
A、Enabled
B、Caption C、Default D、Font
5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 （5） 。
A、Caption B、Name C、Text
D、Label
6、设置一个单选按钮(OptionButton)所
代表选项的选中状态，应当在属性窗
口中改变的属性是 （6） 。
A、Caption B、Name C、Text
D、Value
7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？ （7）
。
A、在标题项中输入&，然后打勾 B、在索引项中打勾
C、在有效项中打勾 D、在复选项中打勾
8、当执行以下过程时，在窗体上将显示 （8） 。
Private Sub
Command1_Click( )
Print
Print
Print
End Sub
A、 VBHello!VB B、 VB
Hello!VB
C、 VB D、 VB
Hello! VB Hello!
VB
9、语句Print 的结果为 （9） 。
A、The answer is
204-2 B、The answer is 3
C、The answer
is 、非法语句
10、下列哪个控件是容器控件 （10） 。
A、Image B、Picture C、ComboBox
D、FileListBox
11、若要将窗体从内存中卸载出去，其实现的方法是
（11） 。
12、以下选项中，不是 Visual Basic控件的是 （12） 。
A.窗体 B.定时器 C.单选框 D.命令按钮
13、双击窗体中的对象后，Visual Basic将显示的窗口是 （13） 。
A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口
14、可决定窗体的左上角是否有控制菜单的属性是 （14） 。
lBox
ton
ton Style
15、设有如下语句：
Strl＝InputBox（输人，，练习）
从键盘上输人字符
“示例”后，Strl的值是 （15） 。
A．“输入” B．“ ”
C．“练习” D．“示例”
16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 （16） 。
A. Form1_Click _Click C. Frm1_Click
D. Me_Click
17、窗体的hide属性的含义是 （17） 。
A.隐藏 B.展现 C.装入
D.卸载
18、若要设置定时器控件的定时时间，需设置的属性是 （18） 。
A．Enabled B．Value C．Interval D．Text
19、能够改变复选框中背景颜色的属性是 （19） 。
A．Value
B．FontColor C．BackColor D．Font
20、窗体能响应的事件是 （20） 。
A．ActiveForm B．Load C．Drive
D．Change
三、判断题(判断下列正确与否，正确的打√，错误的打ⅹ。)
1、三种方式的组合框都允许用户输入哪些不在列表框中的选项。
2、图象框中的Stret
ch属性为true时，其作用是图形自动调整大小以适应图
象控件。
3、在菜单编辑器中使用“索引”时，可有一组菜单项具有相同的“名字”。
4、通过改变属性窗口中的Name属性，来改变窗体的标题。
5、创建VB应用程序的三个
主要步骤是：(1)创建应用程序界面(2)设置控件(3)
编写代码。
6、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常
量。
7
、已知P＝MsgBox(“Howareyou?，VbYesNo+VbQuestion，“Hello!
”)，变
量P是Integer数据类型。
8、工程文件的扩展名是 .vbg 。
9、VB允许设计和使用用户自己设计的控件。
10、OptionButton控件没有DblCliek事件。
11、同一条记录中的各数据具有相同的类型。
12、使用Data控件可以直接显示数据库中的数据。
13、ImageList
是一个图像容器控件，可用作工具栏的图像库。
14、当用户单击工具栏按钮时，将触发工具栏按钮的ButtonClick事件。
15、
在VB的工程资源管理器中，如果从工程中移除已经保存过的文件，该文
件仍然被物理删除（真正删除）
。
16、如果列表框的ListConut的属性为10，则列表框最后一项的ListIndex<
br>值为10。
17、要是某个命令按钮不起作用，应将该按钮的Enabeld属性设置为False。
18、使用数组定义语句：Dim D$$（10），则数组D中各元素的值为空。
19、如果在一行中输入多条语句，各语句之间用使用 ；分隔。
20、在代码窗口中输入某
行代码并按回车键之后，如果代码变成红色，说明该
行代码有语法错误。
四、读程序题，写出程序运行结果
1、 Private Sub
Form_Click()
Static SUM As Integer
I = 1
Do While I<=10
SUM = SUM + I
I = I + 1
Loop
Print SUM
End Sub
运行程序，第一次单击窗体：
第二次单击窗体：
2、 Private Sub
Form_Click()
Print
Print
For I = 15 To
16
Print I;
For j = 2 To 6 Step 3
Print Tab(3 * j); j * I;
Next j
Print
Next I
End Sub
程序运行结果：
五、编程题
（一）窗体中有图片框(Picture1)和计时器(Timer1)两个控件，运行程序
时，
将图片加载到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下脚移
动，每次向左
、向右移动100twip（20分之一像素）。请填空：
Private
Sub Form_load( )
（1）
=loadPicture(“c:”)
（2）
.Interval=200
End Sub
Private Sub Timer1_Timer( )
Static x , y As Integer
x=x+100
y=y+100
（3）
End Sub
（二）有一个单击按钮过程，其作用
是产生50个60～100的随机数，统计其
中被6整除余2的个数，并将这些数输出。请填空：
Private Sub Command1_Click()
Dim x As Integer, N%
Dim Counter
As Integer
(1) Timer
For N=1 To 50
X=Rnd()* (2)
If (3) =2 Then
Print x
Counter= (4)
(5)
Next N
Print Counter
End Sub
《VB程序设计与应用》参考答案
一、填空题
答案
题号
答案
题号
答案
题号
答案
二、选择题
答案
题号
答案
题号
答案
题号
答案
三、判断题
答案
答案
1
1
可视化设计
6
特殊子程序
11
2
事件驱动编程
7
3
窗体（form）
8
4
控件
9
5
集合
10
选中
15
34.6
20
Cls
5
A
10
B
15
D
20
B
8 9 10
双精度
12
动作
13
Print
14
高度
宽度(Width)
（Height）
16
0
1
C
6
D
11
D
16
C
2
3
17
中央
18
工程1
19
空
2
A
7
D
12
A
17
A
4
False
3
B
8
A
13
A
18
C
5 6
Picture
4
C
9
B
14
A
19
C
7
ХХХ√
14
Х√
16
√
17
√
18
√
19
Х
11 12 13 15 20
√ Х √ √ Х
Х √ Х Х √
四、程序阅读题：
（一） （10分）
1 、 55
2、
110
（二）、
（10分）
* 2 5
15
30 75
16 32 80
五、编程题
（20分）
（一）1、
e
2、
Timer1
3、 x ,y
(二) 1、
Randomize
2、
Rnd()*41+60
3、 x Mod
6
4、 Counter＋1
5 End If
大学VB期末考试试题 B卷
一、
填空题
1.ＶＢ中若要产生一消息框，可用（1）MsgBox函数来实现。
2．常量是指在程序运行过程中，（2）其值不能改变的的量。
3．整数类型数据分别包括整型和 （3）长整型 数据。
４、在ＶＢ集成开发环境
中，运行应用程序的方法有三种：一是（4）(单击
“运行”菜单下的启动；二是(5)
单击工具栏上的启动
按钮_；三是（6）按F5键
５、在ＶＢ中若要让某对对象获取焦点，则可通过（7） Setfocus 方法来实现。
6．列表框（ListBox控件）显示 （8） 项目列表
，用户可从中选
择一个或多个项目。
7．框架（Frame控件）可以用来
(9) 对其它控件 进行分组，以便
于用户识别，主要用于为单选按钮分组。
８、在ＶＢ中，用来描述对象外部特征的量称之为对象的（10）属性。
９、为使某窗口中的命令按钮“取消(C)”具有如下特性：按“Alt＋C”键或按
“ESC”
键，均可代替用鼠标单击该按钮的操作，应设置该按钮的Caption属性值为
（11）取消(&C)，并且设置其（12） Cancel属性值为（13）True 。
10、在过程内用（14）Static
声明的变量为静态变量，在执行一个过程结束时，
过程中所用到的
Static变量的值会保留，下次再调用此过程时，变量的初值是上
次调用结束时被保留的值。 <
br>11、在模块文件中的声明部分用Global或（15）public关键字声明的变量为全局
变量。
12、在模块文件中的声明部分用（16）Dim或（17）private定义的变量为模
块级
变量。
13．计时器控件通过定期激活Timer事件，使得Timer控件
（18） 可以每隔
一段时间 就执行一次Timer事件中的代码。
14．要获得滚动条的当前位置，可以访问通过 （19） value
属性
来实现。
15．关闭正在运行的VB窗口将自动触发的事件是 （20）
Unload。
二、选择题
1．工程文件的扩展名是（ B
）。
A．vbg
2.在以下窗体中没有采用的控件是（ B ）。
A.文本框 B 垂直滚动条
按钮
3．滚动条控件（如图所示）的Largechange属性所设置的是（ A ）
A．
单击滚动条和滚动箭头之间的区域时，滚动条控件Value属性值的改
变量
B．
滚动条中滚动块的最大移动位置
C． 滚动条中滚动块的最大移动范围
D． 滚动条控件无该属性
C．框架 D 命令
4、用于从字符串左边截取字符的函数是（ C ）
Ａ、Ltrim( )
Ｂ、Trim( ) Ｃ、Left( ) Ｄ、Instr( )
5、可获得当前系统日期的函数是 （ A ）
Ａ、Date( ) Ｂ、Time(
) Ｃ、IsDate( ) Ｄ、Year( )
6、退出For循环可使用的语句为（ A
）
Ａ、Exit For Ｂ、Exit Do Ｃ、End For Ｄ、End Do
7、窗体的标题栏显示内容由窗体对象的（D ）属性决定。
Ａ、BackColor
Ｂ、BackStyle Ｃ、Text Ｄ、Caption
8、程序运行时，若要通过回车
键调用某命令按钮的Click事件过程，则可设置
该命令按钮的（ C
）属性值为True来实现。
Ａ、Value Ｂ、Enabled
Ｃ、Default Ｄ、Cancel
9、当用户在窗体上单击鼠标时，不会触发的事件是（ D ）
Ａ、Click
Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick
10、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是 （ C ）
Ａ、工程资源管理器窗口 Ｂ、工具箱窗口 Ｃ、代码窗口 Ｄ、属性窗口
11、设a=“Visual Basic”，下面使b=“Visual”的语句是 （ D ）
Ａ、b=Left(a,8,12) Ｂ、b=Mid(a,8,5)
C、b=Rigth(a,6) D、b=Left(a,6)
12、若要使命令按钮不可用，则可设置其（ C ）属性为False来实现。
Ａ、Value Ｂ、Cancel Ｃ、Enabled Ｄ、Default
13．允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？（ C ）
A．在标题项中输入&然后打勾 B 在索引项中输入“√”
C．在复选项中输入“√” D 在有效项中输入“√”
14．当执行以下过程时，在窗体上将显示（ B ）。
Private Sub Commandl_Click( )
Print “VB”
Print“Hello!”；
Print “VB”
End
Sub
A. VB Hello! VB
B.
VB
Hello!VB
C. VB
Hello! VB
D. VB
Hello!
VB
15、以下不属于键盘事件的是（ C ）
Ａ、KeyDown
Ｂ、KeyUp Ｃ、Unload Ｄ、KeyPress
16、以下叙述中正确的是（ A ）
A、窗体的Name属性指定窗体的名称，用来标识一个窗体
B、窗体的Name属性的值是显示在窗体标题栏中的文本
C、可以在运行期间改变对象的Name属性的值
D、对象的Name属性值可以为空
17、图像框或图片框中显示的图形文件，由它们的（ B ）属性值决定。
Ａ、DownPicture Ｂ、Picture Ｃ、Image Ｄ、Icon
18、文本框的（ A ）属性用于设置或返回文本框中的文本内容。
Ａ、Text
Ｂ、(名称) Ｃ、Caption Ｄ、Name
19、复选框或单选钮的当前状态可通过（ B ）属性来返回或设置。
Ａ、Checked Ｂ、Value Ｃ、Selected Ｄ、Caption
20、VB提供（ C ）属性用于控制对象是否可用。
Ａ、Default
Ｂ、Cancel Ｃ、Enabled Ｄ、Visible
三、判断题(判断下列正确与否，正确的打√，错误的打ⅹ。)
１、设置属性的语句格式为：“对象名．属性名＝属性值”． （ ）
２、若用户在键盘上按下一个键，则会产生一个单击事件（ ）．
３、ＶＢ的赋值语句只能给变量赋值． （ ）
４、在ＶＢ中，字符型常量应使用＂＃＂号将其括起来．（ ）
５、窗体大小只能通过鼠标拖动窗体边框来设置．（ ）
6．在定义了一个函数后，可
以象调用任何一个VB内部函数一样使用它，即可以
在任何表达式、语句或函数中引用它。（
）
7．Visual Basic表达式为：1284+COS（28）（ ）
8．Visual Basic表达式为：3*cos (c+d)^2或3*cos
(c+d)*cos (c+d)( )
程序语言两个基本特点是：结构化和事件驱动编程。（ ）
10．工程资源管理器用于查看和管理工程类的文件，不能删除文件。（ ）
四、读程序题，写出程序运行结果
e Sub Form_Click(
)
Static Sum As Integer
For I=1 To
10
Sum= Sum+I
Next I
Print Sum
End Sub 55
e Sub
Form_Click ( )
Print
；Tab(9);3,Tab(18);6
Print
For I=15
to 16
Print I;
For j=3 To 6 Step
3
Print Tab(3*j);j*I;
Next j
Print
Next I
End Sub
e Function Fac(n As Integer)As
Integer
Dim f As Integer
f=f+n
Fac =f
End Function
Private Sub Form_Click( )
Dim I As Integer
For I=1 To 5
Print Σ；I & & Fac(I)
Next I
End
Sub
e Sub Command1_Click( )
=努力
End Sub
Private
Sub Command2_Click( )
=学习
End
Sub
单击Command2按钮，又单击Command1按钮，在文本框中显示什么？
五、编程题
1、在窗体上有一个文本框控件，名称
为TxtTime；一个计时器控件，名
称为Timer1。要求每一秒钟在文本框中显示一次当前的时
间。程序如下，请在
下划线上填入恰当的内容。
Private
Sub Timer1_ _____()
=_____
End Sub
2、在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：
Private Sub Command1_Click()
For a=1 To 4
For b=0 To a
Print Chr(65+a)
Next b
Print
Next a
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是什么？
3、在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Load()
=”计算机”
End Sub
Private Sub Text1_Change()
“等级考试”
End Sub
程序运行后，在文本框中显示的内容是
而在图片框中显示的内容是
填空题
（１）MsgBox函数 （２）其值不能改变 （３）长整型 （４）
单击“运行”菜单下的启动
（５）单击工具栏上的启动按钮 （６）按Ｆ
5键 （７）Setfocus
（８）项目列表 （９）对其它控件 （10）属性 （11）取消(&C)
（12）Cancel
(13) True （14）Static
（15）Public （16）Dim （17）private （18）
可以每隔一个时间段
（19）Value （20）Unload
二、选择题
1．B 2．B 3．A 4. A 5. A
6．A 7.
D 8. C 9. D 10. C
11. D 12. C
13. C 14. B 15.C
16. A 17. B 18. A
19. B 20 . C
三、判断题
1．√ 2.
3. √ 4. 在ＶＢ中，字符型常量应使用＂＂号将其括起
来． 5. 6.
7. 正确的形式是：1284+COS（28*3.14159180） 8. √9.
VB的两个基本特点是：可视化设计和事件驱动编程。 10.
四、读程序题，写出程序运行结果、
1． 结果为：55
2． 结果为：* 3 6
15 45 90
16
48 96
3． 结果为：
Σ1=1
Σ2=2
Σ3=3
Σ4=4
Σ5=5
4. 结果为：努力