VB程序设计和数组20180417.pptVIP

数 组 数 组 数 组 * 数 组 本节要点: 数组的基本概念 数组的定义 数组的操作(输入、输出、删除等) 数组应用举例 * 数组的基本概念 dim a(1 to 10) as integer Dim a1 As Integer Dim a2 As Integer Dim a3 As Integer Dim a4 As Integer Dim a5 As Integer Dim a6 As Integer Dim a7 As Integer Dim a8 As Integer Dim a9 As Integer Dim a10 As Integer a1=int(rnd*10):print a1 a2=int(rnd*10):print a2 a3=int(rnd*10):print a3 a4=int(rnd*10):print a4 a5=int(rnd*10):print a5 a6=int(rnd*10):print a6 a7=int(rnd*10):print a7 a8=int(rnd*10):print a8 a9=int(rnd*10):print a9 a10=int(rnd*10):print a10 for i=1 to 10 step 1 a(i)=int(rnd*10) print a(i) next i * 数组与数组元素 一 、定义： 数组是一组具有相同变量名和相同类型的变量的集合 二、变量声明：数组在使用之前必须先声明，声明的目的是为数组分配存储空间. Dim 数组名（常量） as 数据类型 例： Dim student （1 to 60）as integer Dim student（60） as integer （61个元素） * 数组名:一组数用一个统一的名称表示。 数组元素: 数组中的每一个元素 表示成: 数组名(下标) 下标取值可以是常量、变量、表达式、下标变量 如: G(8) B(I) C(3+K) 如: 若A(5)=4 则 A(A(5))表示A(4) 赋值： 例2：for i=0 to 9 array(i)= i+1 next i 例1：list(0)=12 list(1)=23 list(2)=5 * 注意： 要用圆括号把下标括起来 例如，将X(8)表示成: X[8]、X{8}、或X8都是错误的。 下标必须是整数，否则将被四舍五入为整数。 下标的最小取值称为下界，下标的最大取值称为上界。数组元素的下标必须在其下界和上界之间，否则将会出错。 * 数组的维数 数组的维数:下标个数 一维数组: 由一个下标组成。 如 A(2),C(6) 二维数组: 由两个下标组成。 如 B(2,3) 三维以上的数组称为多维数组，最多60维 * 例:B(2,3)表示B00-B23共12个元素 各元素b00—b23可表示成: B(0,0) B(0,1) B(0,2) B(0,3) B(1,0) B(1,1) B(1,2) B(1,3) B(2,0) B(2,1) B(2,2) B(2,3) 阅读程序，写出运行结果 6 8 5 16 dim a(1 to 3) as integer k = 5 j = 4 a(k \ 3) = 3+k a(sqr(j)) = 9-j a(j-1) = 2*a(1) print a(1),a(2),a(3) dim a(8),b(8) as integer dim j as integer for j=1 to 4 a(j)=2*j b(j)=a(j)*3 next j print b(j\3) Dim array1(10, 10) As Integer Dim i, j, p As Integer For i = 1 To 3 For j = 2 To 4 array1(i, j) = i + j Next j Next I p = array1(2, 3) + array1(3, 4) Print p 12 阅读程序，写出运行结果 随机生成10个小于10的自然数并打印输出，计算这10个数的平均值并打印输出。