一、VB知识点复习：
页码
知识点
1
P5-6
窗体设计窗口 、工程资源管理器窗口、属性窗口 的作用
2
P14 P17-19
常用控件的作用、常用控件的基本属性、常用事件、常用方法
3
P19
VB应用程序的组成每个文件的名称及作用
4
P31-33
系统数据类型了解
5
P37
变量的隐式及显示声明方法
6
P40-43
表达式及优先顺序
7
P44-46
常用函数了解功能
8
P67
焦点事件及方法
9
P68 -P71
inputbox( ) msgbox( ) 功能-参数、返回值
10
P75
计时器控件的属性、事件
11
第4章及第5章分支结构的语法及循环结构的语法了解
12
P90-91
单选按钮、复选按钮常用属性、框架按钮作用常用属性
13
P104-108
列表框及组合框控件的常用属性及方法
14
P117-119
数组定义、使用、常用函数
15
P123
动态数组定义
16
P126
数组元素清楚
17
P134
通用sub过程定义方法
18
P138
Function定义方法
19
P141-145
参数地址传递和值传递 、可选参数、可变参数、数组参数定义方式
二、阅读程序，给出运行结果
1．
Private Sub Command1_Click()
Dim I As Integer, j As Integer, k As Integer
i = 20: j= 2: k= 2
Do While k< i
j = j * 2: k= k+ 7
Loop
Print j
End Sub
2.
Private Sub Command1_Click()
Dim A As String, B As Integer
A = InputBox(“请输入一个字符串”)
B = Len(A)
Print “字符串”； A； “的长度是”； B
End Sub
3．
Public Sub Swap(X As Integer, Y As Integer)
Dim T As Integer
T = X: X = Y: Y = T
End Sub
Private Sub Command1_Click()
Dim A As Integer, B As Integer
A = 10: B = 20
Call Swap(A, B)
Print “A=”； A,“B=”；B
End Sub
4．
Private Sub Value(byref m As Integer,byval n As Integer)
m = m * 2: n = n - 5
End Sub
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x = 10: y = 15
Call Value(x, y)
Print “x=”； x,“y=”；y
End Sub
5.
Private Sub Inc(Byval A As Integer)
Static x As Integer
x = x + A
Print x；
End Sub
Private Sub Command1_Click()
Inc 3
Inc 2
Inc 4
End Sub
6．
Public Sub Proc1(ByVal n As Integer, ByRef m As Integer)
n = n Mod 100
m = m Mod 100
End Sub
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x = 12: y = 34
Call Proc1(x, y)
Print x； y
End Sub
三、编写程序
1、编写输出所有能被3整除的两位数。
2、求所有3位数的水仙花数。
3、随机生成0-99之间的10个数字，并求最大值、最小值、平均值
4、定义sub过程输出能被8整除的两位数，并编写主程序调用输出所有10-99之间能被8整除的数字。
3
本文档为【VB复习题】，请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑，
图片更改请在作品中右键图片并更换，文字修改请直接点击文字进行修改，也可以新增和删除文档中的内容。
该文档来自用户分享，如有侵权行为请发邮件ishare@vip.sina.com联系网站客服，我们会及时删除。
[版权声明] 本站所有资料为用户分享产生，若发现您的权利被侵害，请联系客服邮件isharekefu@iask.cn，我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权，请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传，仅限个人学习分享使用，禁止用于任何广告和商用目的。
浙公网安备 33021202002483