VB培训之数组和结构.ppt

数组和结构
第四章
回顾
基本数据类型
变量和常量
变量和常量的作用域
操作符和表达式
流程控制语句
2
目标
在 Visual Basic 中定义和使用数组
掌握控件数组的基本概念及使用
在 Visual Basic 中创建和使用自定义的数据类型
使用随机函数
3
数组
单独的变量能够存储单个数据值
数组是可以集中存储一组具有相同数据类型的数据项的一种结构
使用数组的优势:数组中的所有值都用单个名称来存储,并可以使用位置索引分别进行标识
4
声明数组和给数组赋值
声明数组:例如,为存储 2 到 20 之间的偶数声明一个数组,Dim even_arr(9) As Integer
给数组赋值:例如,要给上面声明的数组赋值,even_arr (0) = 2even_arr (1) = 4even_arr (2) = 6………even_arr (9) = 20
定义了一个共有10个元素的整型数组
5
使用数组–示例
Private Sub Form_Click()
Dim num(10) As Integer
Dim i As Integer
For i = 0 To 9
num(i) = i + 1
Print num(i)
Next i
End Sub
(在VB环境中进行演示)
6
定义数组的下界
数组的下界可以不为 0
在 Dim 语句中,可以显式地指定所声明的数组的下界
示例
Dim Mynames (1 to 5) as string
‘可以按如下所示对该数组赋值:
Mynames(1) =“Tom”
Mynames(2) =“Joe”
Mynames(3) =“Jack”
Mynames(4) =“Lisa”
Mynames(5) =“Jeff”
7
多维数组
在一些情形下可能希望存储多维数据组成的序列
声明多维数组例如,要声明一个能够存放5个学生的姓名和年龄的数组,Dim stud_age(4,1)
(0,0)
(0,1)
(1,0)
(1,1)
(2,0)
(2,1)
(3,0)
(3,1)
(4,0)
(4,1)
定义了一个5行2列的Variant类型的数组
8
为多维数组赋值
可用下面的语句为二维数组赋值
Dim stud_age(4,1)
stud_age(0,0) = "Tom"
stud_age(0,1) = 25
stud_age(1,0) = "Joe"
stud_age(1,1) = 22
stud_age(2,0) = "Lucy"
stud_age(2,1) = 24
stud_age(3,0) = "Ted"
stud_age(3,1) = 25
stud_age(4,0) = "Harry"
stud_age(4,1) = 23
Tom
25
Joe
22
Lucy
24
Ted
25
Harry
23
9
使用数组元素
要显示上一张幻灯片创建的数组中所有元素的值
Dim i, j As Integer
For i = 0 To 4
For j = 0 To 1
Print stud_age(i, j)
Next j
Next i
0
1
0
Tom
25
1
Joe
22
2
Lucy
24
3
Ted
25
4
Harry
23
10