VB.Net - 数组

数组存储相同类型元素的固定大小的顺序集合。 数组用于存储数据的集合，但将数组视为相同类型的变量的集合通常更有用。

所有数组都由连续的内存位置组成。 最低地址对应于第一个元素，最高地址对应于最后一个元素。

在 VB.Net 中创建数组

要在 VB.Net 中声明数组，请使用 Dim 语句。 例如，

Dim intData(30)	  ' 包含 31 个元素的数组
Dim strData(20) As String	' 21 个字符串的数组
Dim twoDarray(10, 20) As Integer	'二维整数数组
Dim ranges(10, 100)	 '二维数组

您还可以在声明数组时初始化数组元素。 例如，

Dim intData() As Integer = {12, 16, 20, 24, 28, 32}
Dim names() As String = {"Karthik", "Sandhya", _
"Shivangi", "Ashwitha", "Somnath"}
Dim miscData() As Object = {"Hello World", 12d, 16ui, "A"c}

可以使用数组的索引来存储和访问数组中的元素。 下面的程序演示了这一点 −

Module arrayApl
   Sub Main()
      Dim n(10) As Integer ' n is an array of 11 integers '
      Dim i, j As Integer
      ' 初始化数组 n 的元素 '         
      
      For i = 0 To 10
          n(i) = i + 100 ' set element at location i to i + 100 
      Next i
      ' 输出每个数组元素的值 '
      
      For j = 0 To 10
          Console.WriteLine("Element({0}) = {1}", j, n(j))
      Next j
      Console.ReadKey()
   End Sub
End Module

当上面的代码被编译并执行时，会产生以下结果 −

Element(0) = 100
Element(1) = 101
Element(2) = 102
Element(3) = 103
Element(4) = 104
Element(5) = 105
Element(6) = 106
Element(7) = 107
Element(8) = 108
Element(9) = 109
Element(10) = 110

动态数组

动态数组是可以根据程序的需要确定尺寸和重新确定尺寸的数组。 您可以使用 ReDim 语句声明动态数组。

ReDim 语句的语法 −

ReDim [Preserve] arrayname(subscripts)

其中，

• 当您调整现有数组的大小时，Preserve 关键字有助于保留现有数组中的数据。

• arrayname 是要重新维度的数组的名称。

• subscripts指定新维度。

Module arrayApl
   Sub Main()
      Dim marks() As Integer
      ReDim marks(2)
      marks(0) = 85
      marks(1) = 75
      marks(2) = 90
     
      ReDim Preserve marks(10)
      marks(3) = 80
      marks(4) = 76
      marks(5) = 92
      marks(6) = 99
      marks(7) = 79
      marks(8) = 75
      
      For i = 0 To 10
         Console.WriteLine(i & vbTab & marks(i))
      Next i
      Console.ReadKey()
   End Sub
End Module

当上面的代码被编译并执行时，会产生以下结果 −

0	85
1	75
2	90
3	80
4	76
5	92
6	99
7	79
8	75
9	0
10	0

多维数组

VB.Net 允许多维数组。 多维数组也称为矩形数组。

您可以将二维字符串数组声明为 −

Dim twoDStringArray(10, 20) As String

或者，整数变量的 3 维数组 −

Dim threeDIntArray(10, 10, 10) As Integer

以下程序演示了创建和使用二维数组 −

Module arrayApl
   Sub Main()
      ' 5 行 2 列的数组
      Dim a(,) As Integer = {{0, 0}, {1, 2}, {2, 4}, {3, 6}, {4, 8}}
      Dim i, j As Integer
      ' 输出每个数组元素的值 '
      
      For i = 0 To 4
          For j = 0 To 1
              Console.WriteLine("a[{0},{1}] = {2}", i, j, a(i, j))
          Next j
      Next i
      Console.ReadKey()
   End Sub
End Module

当上面的代码被编译并执行时，会产生以下结果 −

a[0,0]: 0
a[0,1]: 0
a[1,0]: 1
a[1,1]: 2
a[2,0]: 2
a[2,1]: 4
a[3,0]: 3
a[3,1]: 6
a[4,0]: 4
a[4,1]: 8

交错数组(也称为锯齿状数组)

交错数组是数组的数组。 以下代码显示声明一个名为 scores 的整数交错数组 −

Dim scores As Integer()() = New Integer(5)(){}

以下示例说明了使用交错数组 −

Module arrayApl
   Sub Main()
      '由 5 个整数数组组成的锯齿状数组
      Dim a As Integer()() = New Integer(4)() {}
      a(0) = New Integer() {0, 0}
      a(1) = New Integer() {1, 2}
      a(2) = New Integer() {2, 4}
      a(3) = New Integer() {3, 6}
      a(4) = New Integer() {4, 8}
      Dim i, j As Integer
      ' 输出每个数组元素的值
      
      For i = 0 To 4
         For j = 0 To 1
            Console.WriteLine("a[{0},{1}] = {2}", i, j, a(i)(j))
         Next j
      Next i
      Console.ReadKey()
   End Sub
End Module

当上面的代码被编译并执行时，会产生以下结果 −

a[0][0]: 0
a[0][1]: 0
a[1][0]: 1
a[1][1]: 2
a[2][0]: 2
a[2][1]: 4
a[3][0]: 3
a[3][1]: 6
a[4][0]: 4
a[4][1]: 8

Array 数组类

Array 数组类是 VB.Net 中所有数组的基类。 它在系统命名空间中定义。 Array 类提供了各种用于处理数组的属性和方法。

Array 数组类的属性

下表提供了 Array 类的一些最常用的属性 −

数组类的方法

下表提供了 Array 类的一些最常用的方法 −

有关 Array 类属性和方法的完整列表，请参阅 Microsoft 文档。

示例

下面的程序演示了Array类的一些方法的使用:

Module arrayApl
   Sub Main()
      Dim list As Integer() = {34, 72, 13, 44, 25, 30, 10}
      Dim temp As Integer() = list
      Dim i As Integer
      Console.Write("Original Array: ")
      
      For Each i In list
         Console.Write("{0} ", i)
      Next i
      Console.WriteLine()
      ' 反转数组
      Array.Reverse(temp)
      Console.Write("Reversed Array: ")
      
      For Each i In temp
         Console.Write("{0} ", i)
      Next i
      Console.WriteLine()
      '对数组进行排序
      Array.Sort(list)
      Console.Write("Sorted Array: ")
      
      For Each i In list
         Console.Write("{0} ", i)
      Next i
      Console.WriteLine()
      Console.ReadKey()
   End Sub
End Module

当上面的代码被编译并执行时，会产生以下结果 −

Original Array: 34 72 13 44 25 30 10
Reversed Array: 10 30 25 44 13 72 34
Sorted Array: 10 13 25 30 34 44 72