VB.NET一维数组简单介绍

大家在对VB.NET的学习中可能会对数组的学习产生一些疑问。在这里我们就来了解一下VB.NET一维数组的具体用法，希望能对大家有所帮助。在VB.NET中数组的用法与VB 中有一点不同。#t#

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

Dim data(10) as String

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

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

data(0)="一" ;data(1)="二";……

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

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

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

 
 
 
  
  
  
Public Sub SetArrayData
(ByVal ParamArray All())  
  
  
  
Dim aL As Long, aU As Long, 
aNo As Long  
  
  
  
Dim dL As Long, dU As Long  
  
  
  
Dim i As Long  
  
  
  
dL = LBound(All)  
  
  
  
dU = UBound(All)  
  
  
  
aNo = dL 
  
  
  
aL = LBound(All(aNo))  
  
  
  
aU = UBound(All(aNo))  
  
  
  
dLdL = dL + 1  
  
  
  
For i = dL To dU  
  
  
  
All(aNo)(aL + i - dL) = All(i)  
  
  
  
Next i  
  
  
  
End Sub 
 
 

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

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

返回的结果data()中下标为0-5 分别赋值为0，1，2，3，4，5

分享文章：VB.NET一维数组简单介绍
浏览地址：http://www.shufengxianlan.com/qtweb/news9/317659.html

网站建设、网络推广公司-创新互联，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联