第五章 数组.ppt

(2) 统计高于平均分的人数 静态数组 Dim A(2)As Double 一维数组A，共有三个双精度元素，分别为A(0)、A(1)、A(2)。 Dim B(-2 To 2)As Single 一维数组B，共有5个单精度元素，分别为B(-2)、B(-1)、B(0)、B(1)、B(2) Dim C(2, 1 To 2)As Integer 二维数组C，共有6个整型元素，分别为C(0,1)、C(0,2)、C(1,1)、C(1,2)、C(2,1)、C(2,2)。 Dim D(1,1)As Double 二维数组D，共有4个双精度元素，分别为D(0,0)、D(0,1)、D(1,0)、D(1,1)。 静态数组 dim a(3) as integer 静态数组a有多少个元素？ dim b(2,3) as integer 静态数组b有多少个元素？ 静态数组 例如： Orange(1 to 5)表示一维数组共有5个元素。 Apple(1 to 3, 2 to 5) 表示二维数组，大小为3×4，元素总数为二个维数的乘积12，该数组在数学上可表示为3行4列的矩阵。 Pear(1 to 2,1 to 3,2 to 4) 表示三维数组，大小为2×3×3，元素总数为三个维数的乘积18，该数组在数学上可以用立体图形来表示。 注意： 在增加数组的维数时，数组所占的存储空间会大幅度增加，由于对每一个下标变量都分配空间，所以声明数组的大小要合适。 数组的下标 数组的下标 生成10个随机数，放到大小为10的数组中，并交换前10个和后10个元素的值 用数组统计高于平均分的人数 Dim mark(1 To 100) As Single aver = 0 For i = 1 To 100 mark(i) = InputBox(输入 i 位学生的成绩) aver = aver + mark(i) Next i aver = aver /100 overn = 0 For i = 1 To 100 if mark(i) aver Then overn = overn + 1 Next i Print aver, overn 数组的概念 5) 下标变量的使用说明 下标变量由数组名后跟小括号“()”括起来的下标组成。且下标必须放在小括号内。 例如： a(3)不能写成 a3，否则被当作简单变量处理。 下标可以是常量、数值变量、算术表达式。 例如： a(6)，b(2*m+1)，c(i)。 若下标中若含有变量，使用前该变量应提前赋值。 例如：当i=1时：a(i)表示a(1)，a(i+2)表示a(3)； 当i=b(1)=1时：a(b(1))表示a(1)。 动态数组 2．创建动态数组的步骤 1）声明一个空维数表的数组（不必说明维数和界限）。 例如：Dim X( )As Integer。 2）在需要指定数组大小时，再使用ReDim语句分配数组中实际元素个数。 例如：ReDim X(50,50)。 引例： 求一个班全体学生的平均成绩 Dim mark!(), n As Integer n=Val(InputBox(“请输入该班的学生人数)) ReDim mark(1 To n) aver = 0 For i = 1 To n mark(i) = InputBox(输入 i 位学生的成绩) aver = aver + mark(i) Next i aver = aver / n [注意] Dim、Private、Public变量声明语句是说明性语句，可出现在过程内或通用声明段；ReDim语句是执行语句，只能出现在过程内。 在静态数组声明中的下标只能是常量，在动态数组ReDim语句中的下标可以是常量，也可以是有了确定值的变量 在过程中可多次使用ReDim来改变数组的大小，也可以改变数组的维数 [注意] 4. 每次使用ReDim语句会使原来数组中的值丢失,在ReDim语句后加Preserve参数可以保留原数组中的数据，但是只能改变多维数组中最后一维的上界，不能改变数组的维数和前面几维的大小。 5. 静态数组在程序编译时分配存储单元，动态数组在运行时分配存储单元。 数组的引用 2. 数组元素赋值 利用循环结构 由于数组元素的下标是可以变化的，将下标作为循环变量，可很方便使用For循环给数组中的元素赋值。 Dim a(1 To 10) As Integer, b( ) as integer, i% For i = 1 to 10 a(i) = i Next