动画介绍： 数组
声明：
dim 数组名（下标的上界）as 数据类型
dim 数组名（上界1，上界2）as 数据类型
引用：
数组名（下标）
数组名（下标1，下标2）
初始化：
dim 数组名（）as 数据类型 ={值1，值2，值3，...}
dim 数组名（）as 数据类型 ={{值11，值12...},{值21，值22...}}
调整大小：
Redim 数组名（重新定义的数组元素下标的上界1，上界2，.....）
Preserve调整最后一个维度的大小大小并保留原值
Array类：
length属性：获取元素个数
rank属性：获取数组维数
getlenght方法：获取元素个数
getlowerbound方法：获取指定维数的下限
getupperbound方法：获取指定维数的上限
copy方法：复制原数组的某段数据到目的数组中
sort方法：对一维数组的元素进行排序
clear方法：将数组中所有元素的值恢复为默认值
例子1
Dim score(,) As Single = {{75, 81, 68, 92.5, 84}, {67, 85, 78.5, 94, 74}, {81.5, 78, 65, 81, 94}}
Dim sngave As Single = 0
Dim i, j As Integer
For i = 0 To 2
For j = 0 To 4
sngave = sngave + score(i, j)
Console.WriteLine("第{0}个学生第{1}门课程的成绩为：{2}", i + 1, j + 1, score(i, j))
Next
Next
sngave = sngave / (3 * 5)
Console.WriteLine("3个学生5门课程的平均成绩为：{0}", sngave)
例子2
Dim score1() As Single = {75, 81, 68}
Dim score2(,) As Single = {{75, 81, 68, 92.5, 84}, {67, 85, 78.5, 94, 74}}
Dim score3(3) As Single
Console.WriteLine("数组score1所包含的个数为{0}", score1.Length)
Console.WriteLine("数组score2所包含的个数为{0}", score2.Length)
Console.WriteLine("*************************************")
Console.WriteLine("数组score1的维数为{0}", score1.Rank)
Console.WriteLine("数组score2的维数为{0}", score2.Rank)
Console.WriteLine("*************************************")
Console.WriteLine("数组score2第一维的元素个数为{0}", score2.GetLength(0))
Console.WriteLine("数组score2第二维的元素个数为{0}", score2.GetLength(1))
Console.WriteLine("*************************************")
Console.WriteLine("数组score2第一维的下限为{0}", score2.GetLowerBound(0))
Console.WriteLine("数组score2第一维的上限为{0}", score2.GetUpperBound(1))
Console.WriteLine("*************************************")
Array.Copy(score1, score3, 2)
Console.WriteLine("数组score3的数组元素值为：{0},{1},{2},{3}", score3(0), score3(1), score3(2), score3(3))
Console.WriteLine("*************************************")
Array.Sort(score1)
Console.WriteLine("对一维数组从小到大的排序结果为：{0},{1},{2}", score1(0), score1(1), score1(2))
Console.WriteLine("*************************************")
Array.Clear(score1, 2, 1)
Console.WriteLine("数组score3的数组元素为：{0},{1},{2}", score1(0), score1(1), score1(2)) | |
安全中国首页 > 动画中心 > VB编程
