⼆维数组赋值_⼀起学VB——数组的基本操作
前⾯两节课程，我们已经将数组的概念、数组的分类以及如何声明数组⼀起深⼊的学习过了。本节课程，我们学习数组的基本操作。数组的
基本操作包含：数组元素的输⼊输出、插⼊和删除元素、查询等。 数组元素的输⼊ 在数组声明后，数组元素的值均为其数据类型的初始
值，⽐如数值型初始值为0。因此，通常在正式使⽤数组前，我们需要为数组赋值。为数组元素赋值有⼏种⽅式。 ⽅式⼀： 像为变量赋值
⼀样，逐⼀为每个元素赋值。 例如：
Dim Student(1 To 3) as StringA(1)="张三"A(2)="李四"A(3)="王五"
⽅式⼆： 采⽤Array函数为动态数组赋值，可以⼀次赋值多个元素。注意，此⽅法只能为变体型的动态数组赋值。 例如：
Dim Grade()Grade=Array(76,88,65,92)
说明:
数组全部赋值为1Array函数语法格式如下：语法：Array(arglist)作⽤：返回⼀个包含数组的 Variant。
Array函数中，所需的 arglist 参数是⼀个⽤逗号隔开的值表，这些值⽤于给 Variant 所包含的数组的各元素赋值。如果不提供参数，则创
建⼀个长度为 0 的数组。 ⽅式三： 使⽤循环语句为数组中的元素赋值，此⽅法通常⽤于数据量较⼤时。 例如，为⼀个9*9的⼆维数组随机
赋值1-100之间的数，代码如下：
Dim A%(1 To 9,1 To 9)Dim i%,j%For i=1 To 9    For j=1 To 9                A(i,j)=100*rnd()+1    Next jNext i
该⽅法，也可以在其中使⽤InputBox函数来实现交互式输⼊。 数组元素的输出 所谓数组元素的输出就是获取数组元素的值。其⽅法与访问
变量值类似。直接使⽤ 数组名(下标) 的⽅式即可取出元素值。 举例： 以上⾯，数组元素的输⼊中⽅式三的例⼦来说，获取数组A的每个数
组元素并打印出来，代码如下：
For i=1 To 9    For j=1 To 9                Print "第" & i & "-" & j & "个数组元素为："& A(i,j)    Next jNext i
数组元素的插⼊ 数组的插⼊是指在数组指定位置插⼊⼀个新的元素，其后⾯的元素全部依次往后顺延，其效果如下⾯两张图⽚所⽰：
由于对数组插⼊新的元素后，将会改
变数组的长度，因此该⽅法只能针对动态数组⽽⾔。
例：Option ExplicitPrivate Sub Command1_Click()        Dim A(), i%                '为数组赋值        A = Array(1, 2, 3, 4)    '打印插⼊前的数组        For i = 0 To 3
运⾏效果如图所⽰：
删除数组元素
数组元素的删除与数组元素的插⼊是类似的，都会改变数组的长度，⼀个是增加长度，⽽另⼀个则是减少长度。 其效果如下图所⽰：
数组元素的查 查操作，即需要在数组中查指定的数据。 需要采⽤遍历⽅法，即采⽤循环结构，将数组中的每⼀个元素取出，并与需
要的数据⽐对，看是否是需要的结果。 举例，在⼀个⼆维数组中，存储了⼀个班级的学⽣姓名以及对应的成绩，输⼊⼀个学⽣姓名后，可
以查其对应的成绩，如果没有查到则提⽰⽆此学⽣。 程序界⾯如下：
程序代码如下：
Option ExplicitOption Base 1  '声明数组下标从1开始Dim Student$(9, 2)  '定义⼆维数组Private Sub Form_Load()    Dim i%    '输⼊学⽣姓名    Student(1, 1) = "孙悟程序代码截图如下：
好了，关于数组的基本操作，本节课程先讲到这么多。下节课程，学习数组的排序。我们下节课再见。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。