< 返回技术文档列表

VB.NET中如何使用一维数组

发布时间:2021-09-01 01:43:24⊙投诉举报

这篇文章将为大家详细讲解有关VB.NET中如何使用一维数组,文章内容质量较高,因此小编分享给大家做个参考,希望大家阅读完这篇文章后对相关知识有一定的了解。

首先在定义数组过程中,定义静态数组语句是相同的

Dim data(10) as String

vb6中如上定义表示数组data()中有10个元素,下标分别是0-9 而VB.NET中表示数组 data() 中有11个元素,下标分别为0-10

VB.NET一维数组赋值: 我们可以对数组进行单一的赋值,方法:

data(0)="一" ;data(1)="二";&hellip;&hellip;

同样我们也可以对数组进行一次性的赋值,VB6.0中我们可以用 Array函数进行赋值,如:

Dim data
data=Array(1,2,3,4,5,6,7,8)

但VB.net中以上函数不可用, 这样我们可以创建一个函数来对VB.NET一维数组进行一次性赋值,以下是我编写的一个函数,供大家参考:

  1. Public Sub SetArrayData
    (ByVal ParamArray All())  

  2. Dim aL As Long, aU As Long, 
    aNo As Long  

  3. Dim dL As Long, dU As Long  

  4. Dim i As Long  

  5. dL = LBound(All)  

  6. dU = UBound(All)  

  7. aNo = dL 

  8. aL = LBound(All(aNo))  

  9. aU = UBound(All(aNo))  

  10. dLdL = dL + 1  

  11. For i = dL To dU  

  12. All(aNo)(aL + i - dL) = All(i)  

  13. Next i  

  14. End Sub 

通过调用以上的函数可以对VB.NET一维数组进行一次性的赋值:

Call SetArrayData(data,"0","1","2","3","4","5")

关于VB.NET中如何使用一维数组就分享到这里了,希望以上内容可以对大家有一定的帮助,可以学到更多知识。如果觉得文章不错,可以把它分享出去让更多的人看到。


/template/Home/Zkeys/PC/Static