对数组元素的输入可以有多种方法，例如赋值语句、文本框、InputBox函数、Array函数等，可以对数组的个别元素输入数据，也可以对整个数组输入数据。

一、使用赋值语句逐一赋值

该方法一般适用于数组元素个数较少的情况。

Dim score（3）As Integer

score（0）＝12：score（1）＝1：score（2）＝34：score（3）＝100

二、Array函数

Array函数用来为数组元素赋值，即把一组数据读入某个数组中。

格式：Array（参数表）。

功能：返回一个数组，数组元素的值由“参数表”指定。

说明：“参数表”是一系列用逗号分隔的值，这些值构成数组的各元素值。Array函数只能给Variant类型的变量赋值，赋值后的数组大小由参数的个数决定，数组下标的下界由Option Base语句指定的下界决定。

（1）所谓的数组的初始化，就是给数组的各元素赋初值。

（2）VB提供了Array函数，利用该函数，可以使数组在程序运行之前初始化，各元素得到初值。

（3）Array函数用来给数组元素至少赋初值一次，即把一个数据集体导入某个数组，其格式为：

数组变量名＝Array（数组元素值）

（4）数组变量不能是具体的数据类型，只能是变体类型。

（5）数组变量可以通过以下三种方式定义：

第一种，显示定义为Variant变量；

第二种，在定义时不指明类型；(www.daowen.com)

第三种，不定义而直接使用；

（6）Array函数只适用于一维数组，即只对一维数组进行初始化，不能对二维或多维数组进行初始化。例如：

执行以上赋值之后D（0）＝1，D（1）＝2，D（2）＝3，D（3）＝4。

三、循环输入

该方法主要用于数组元素与下标之间存在函数关系，各元素的值可用i的表达式表示。（Rnd*100＋1）或a（i）＝（2*i－1）*10（该方法主要用于数组元素与下标之间存在函数关系，各元素的值可用i的表达式表示。）

Next i

另外，也可使用InputBox函数为数组元素赋值，增强与用户的交互性。但不适合大批量的数据输入。

【例9．1】随机产生5个两位数，求它们的平均值、最大值和最小值。

界面设计：

图9－6　例9．1运行结果

编辑代码：