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 4．
Private Sub Form_Activate() Print \
Print \Print
Print \Print 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》期末复习参考答案
一、填空题
1．创建应用程序界面 设置属性 编写代码 2．属性、text 3．Label TextBox
4．Load方法 Show方法 Hide方法 Unload方法 5．txtshow.text=\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
16．FileCopy \，\
二、单项选择题
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．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，输出结果为： 3. * ** *** **** ***** 4.
aabb -30 False aabb-30 False
30+60 90 30+60 90 5.
11 13 9
五、编程题 1．
。120