当前位置:K88软件开发文章中心编程语言.NET.NET02 → 文章内容

VB.Net - 数组

减小字体 增大字体 作者:佚名  来源:网上搜集  发布时间:2019-1-15 15:59:00

由 yiyohunter 创建,youj 最后一次修改 2016-12-12 数组存储相同类型的元素的固定大小顺序集合。 数组用于存储数据集合,但将数组视为同一类型的变量的集合通常更有用。所有数组由连续的内存位置组成。 最低地址对应于第一个元素,最高地址对应于最后一个元素。 在VB.Net中创建数组要在VB.Net中声明数组,可以使用Dim语句。 例如, Dim intData(30) ' an array of 31 elementsDim strData(20) As String' an array of 21 stringsDim twoDarray(10, 20) As Integer'a two dimensional array of integersDim ranges(10, 100) 'a two dimensional array您还可以在声明数组时初始化数组元素。 例如, 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 ' initialize elements of array n ' For i = 0 To 10 n(i) = i + 100 ' set element at location i to i + 100 Next i ' output each array element's value ' For j = 0 To 10 Console.WriteLine("Element({0}) = {1}", j, n(j)) Next j Console.ReadKey() End SubEnd Module当上述代码被编译和执行时,它产生了以下结果: Element(0) = 100Element(1) = 101Element(2) = 102Element(3) = 103Element(4) = 104Element(5) = 105Element(6) = 106Element(7) = 107Element(8) = 108Element(9) = 109Element(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 SubEnd Module当上述代码被编译和执行时,它产生了以下结果: 08517529038047659269977987590100多维数组 VB.Net允许多维数组。多维数组也被称为矩形数组。 你可以声明一个二维的字符串数组: Dim twoDStringArray(10, 20) As String或者,整数变量的3维数组: Dim threeDIntArray(10, 10, 10) As Integer下面的程序演示创建和使用二维数组: Module arrayApl Sub Main() ' an array with 5 rows and 2 columns Dim a(,) As Integer = {{0, 0}, {1, 2}, {2, 4}, {3, 6}, {4, 8}} Dim i, j As Integer ' output each array element's value ' 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 SubEnd Module当上述代码被编译和执行时,它产生了以下结果: a[0,0]: 0a[0,1]: 0a[1,0]: 1a[1,1]: 2a[2,0]: 2a[2,1]: 4a[3,0]: 3a[3,1]: 6a[4,0]: 4a[4,1]: 8不规则数组Jagged数组是一个数组的数组。 以下代码显示了声明一个名为score of Integers的不规则数组: Dim scores As Integer()() = New Integer(5)(){}下面的例子说明使用不规则数组: Module arrayApl Sub Main() 'a jagged array of 5 array of integers 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 ' output each array element's value 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 SubEnd Module当上述代码被编译和执行时,它产生了以下结果: a[0][0]: 0a[0][1]: 0a[1][0]: 1a[1][1]: 2a[2][0]: 2a[2][1]: 4a[3][0]: 3a[3][1]: 6a[4][0]: 4a[4][1]: 8 Array类 Array类是VB.Net中所有数组的基类。 它在系统命名空间中定义。 Array类提供了处理数组的各种属性和方法。 Array类的属性下表提供了一些Array类中最常用的属性 : SN属性名称和说明1 IsFixedSize Gets a value indicating whether the Array has a fixed size.获取一个值,指示数组是否具有固定大小。 2 IsReadOnly Gets a value indicating whether the Array is read-only.获取一个值,该值指示Array是否为只读。 3Length Gets a 32-bit integer that represents the total number of elements in all the dimensions of the Array.获取一个32位整数,表示数组所有维度中元素的总数。 4 LongLength Gets a 64-bit integer that represents the total number of elements in all the dimensions of the Array.获取一个64位整数,表示数组所有维度中元素的总数。 5 Rank Gets the rank (number of dimensions) of the Array.获取数组的排名(维数)。 Array类的方法下表提供了一些最常用的Array类方法: SN方法名称和说明1 Public Shared Sub Clear (array As Array, index As Integer, length As Integer)公共共享子清除(数组为数组,指数为整数,长度为整数) 设置一个范围的数组元素的零,为false,或为空,这取决于元素类型。 2 Public Shared Sub Copy (sourceArray As Array, destinationArray As Array, length As Integer)公共共享子复制(sourceArra

[1] [2]  下一页


VB.Net - 数组