大家在對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