第四章 数组.ppt

《VB程序设计》第四章数组
第四章数组
1
静态数组及声明
2
数组的输入与输出
3
数组应用
4
数组的概念
动态数组
5
jing-spss
第四章数组
本章要点:
了解数组的概念
掌握一维、二维数组的声明与使用
掌握动态数组的声明与使用
jing-spss
数组的概念
引例:求一个班100个学生的平均成绩,然后统计高于平均分的人数。
aver = 0
For i = 1 To 100
mark = InputBox("输入" + i + "位学生的成绩")
aver = aver + mark
Next i
aver = aver / 100
jing-spss
数组的概念
是一组相同类型的变量的集合
数组遵循先声明后使用的原则
每个数组是用一个统一的数组名表示数组元素的集合
数组中的每一元素具有唯一索引号(即下标),可以用数组名及下标唯一地识别一个数组的元素
jing-spss
静态数组及声明
一维数组
Dim 数组名(<下标>) [As 类型]
*在声明时,给定数组元素个数的数组称为静态数组
*声明了数组的名、大小、类型
*下标形式: [<下界> To<上界>]
必须为常数,省略下界为0
Dim mark(1 to 100) As Integer
jing-spss
静态数组及声明
多维数组:具有2个以上下标的数组。
Dim a ( 0 To 3, 0 To 4) As Long
Dim a (3, 4) As Long
A(0,0)
A(0,1)
A(0,2)
A(0,3)
A(0,4)
A(1,0)
A(1,1)
A(1,2)
A(1,3)
A(1,4)
A(2,0)
A(2,1)
A(2,2)
A(2,3)
A(2,4)
A(3,0)
A(3,1)
A(3,2)
A(3,3)
A(3,4)
jing-spss
静态数组及声明
下界缺省为0,也可在重新定义数组的下界。例如:Option Base 1
错误的声明,下标是变量
n =Inputbox(“输入n”)
Dim x(n) As Single
下标位置不同,意义不同
Dim x(10) As Integer ’声明x数组有11个元素
x(10)=100’对x(10)这个数组元素赋值
jing-spss
数组输入与输出
数组初始化
1、使用输入对话框
……
Dim i as integer
Dim a(1 to 30) as integer
For i=1 to 30
A(i)=val(inputbox(“输入学生成绩”,“第”&str(i)&”个学生”))
Next i
jing-spss
数组输入与输出
数组初始化
2、使用随机函数初始化
……
Dim i as integer
Dim a(1 to 20) as integer
For i=1 to 30
A(i)=int(rnd*61)+20
Next i
jing-spss