9．Sub 过程与 Function 过程最根本的区别是（ D ）。
A、Sub 过程可以使用 Call 语句或直接使用过程名调用，而 Function 过程不可以。
B、Function 过程可以有参数，Sub 过程不可以。
C、两种过程参数的传递方式不同。
D、Sub 过程的过程名不能返回值，而 Function 过程能够通过过程名返回值。
__text__属性设置成空白。
3．Label 和 TextBox 控件用来显示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使用_Label___控
件；若允许用户输入文本，则应使用__TextBox__控件。
4．窗体的常用方法有__．Load 方法 Show 方法 Hide 方法
Unload 方法__。
10．事件过程通常由事件驱动执行，而 Sub 过程通过过程调用执行。T
11．将焦点主动设置到指定的控件或窗体上应采用 SetFocus 方法。T 12．当图像控件（Image）的 Stretch 属性为 True 时，Image 控件能自动调整自己的尺寸与显示的图片匹配。 不正确。该属性设为 Ture 时，Image 控件不能自动调整自己的尺寸与显示的图片匹配，而可以使图片自动扩展以适应 控件的尺寸。 四、读程序题，写出程序运行结果。 1．Private Sub Form_Click()
aabb
-30
False
aabb-30 False
30+60
90
30+60 90
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
11
13
9
五、编程题
1．设计一个计算程序。该程序用户界面如图所示，由四个文本框：文本框 1（text1）、文本框 2（text2）、文本框 3
c = Trim(Text3.Text) If a = "" Or b = "" Or c = "" Then MsgBox "成绩填写不完全！", vbCritical Else Text4.Text = (Val(a) + Val(b) + Val(c)) / 3 End If End Sub Private Sub Command3_Click() Unload Me End Sub 2．设计程序。要求：从文本框 Text1 中接收输入的数据，当单击确定按钮（command1）时，如果该数据满足条件： 除以 3 余 2，除以 5 余 3，除以 7 余 4，则输出；否则将焦点定位在文本框 Text1 中，选中其中的文本。 答案： Private Sub Command1_Click() 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 3．设计一个欢迎程序。该程序用户界面如图所示。要求程序运行后，用户选中粗体复选框时，标签（Label1）中的文 字（欢迎您！）的字体变成粗体，用户选中斜体复选框时，标签的字体变成斜体。若取消选中，则恢复原字体。单击结 束，则退出。 答案: Private Sub Check1_Click() If Check1.Value = 1 Then Label1.Font.Bold = True Else
6．下列程序运行结果为 True
False 。逻辑表达式计算结果
Private Sub Command1_Click()
a=1
b=2
c=3
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# 不正确。两个日期型数据相减，其结果是
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 ）
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）
一个数值型数
8．可以在窗体的通用部分声明静态变量。 ．不正确。静态变量为局部变量，只能在过程中声明。
9．使用声明语句建立一个变量后，Visual Basic 会自动对数值类型的变量赋初值 0，变长的字符串被初始化为一个零
长度的字符串""，定长字符串用空格填充，Variant 变量被初始化为 Empty，布尔型的变量被初始化为 False。 T
14．对象的方法用于_完成某种特定的功能__。当方法不需要任何参数并且也没有返回值时，调用对象的方法的格式为
_对象名.方法名_____，例如，对窗体 Form1 使用 Show 方法，应写成___ Form1.Show _。
15．PictureBox 控件可通过设置其__．AutoSize ________属性为 True 使之可自动调整大小；而 Image 控件可通
二、单项选择题
1．下列控件中没有 Caption 属性的是（B ）
A、标签
B、文本框
C、框架
D、命令按纽
2．除框架外，能对单选按纽分组的控件是（ C ）。
A、窗体
B、标签 C、图片框
D、图像
3．下列符号不能作为 VB 中变量名的是（ C ）。
A 、 ABCDEFG B、 P00000 C、 89YWDDF D、xyz
答案 ：
Private Sub Command1_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
Private Sub Command2_Click()
a = Trim(Text1.Text)
b = Trim(Text2.Text)
A、列表框
B、图片框
C、窗体
D、计时器
12．在 Visual Basic 中，按文件的访问方式不同，可以将文件分为（ A ）
A、顺序文件、随机文件和二进制文件
B、文本文件和数据文件
C、数据文件和可执行文件
D、ASCⅡ文件和二进制文件
13．将通用对话框 CommonDialog 的类型设置成“颜色”对话框，可调用该对话框的（ C ）方法。
Static S As Integer Dim i As Integer S=1 For i = 1 To 5
S=S*i Next i Print S End Sub ．程序运行后，单击按钮 Command1，输出结果为：120。 3． For X = 5 To 1 Step -1 For Y = 1 To 6 - X
Not b<c 的值是__ False __。
10．日期表达式 #2/24/02# - #2/12/02# 的值为____12_______。
11．数学表达式 sin2x+ 写成等价的 Visual Basic 表达式为__．Sin(x) ^ 2 + Sqr(x ^ 2 - y ^ 2) / (2 * x)。
双击自动滚屏
VB 程序设计期末模拟试题及答案
发布者：汤中艮 发布时间：2009-12-7 阅读：1639 次
《VB》期末复习题及答案
综合复习题
一、填空题
1．创建一个 VB 应用程序三个主要的步骤是_创建应用程序界面_、__设置属性___和_编写代码_______。
2．当程序运行时，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的__属性__窗口中，把此文本框的__
（text3）、文本框 4（text4），和三个按钮：命令按钮 1（command1）、命令按钮 2（command2）、命令按钮
3（command4）组成。程序运行后，用户单击清除按钮，则清除文本框中显示的内容。单击计算按钮，如果成绩填写
不完全，则给出提示信息，否则计算三科平均成绩。单击退出按钮则退出。
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