VB.NET一維數(shù)組簡(jiǎn)單介紹
大家在對(duì)VB.NET的學(xué)習(xí)中可能會(huì)對(duì)數(shù)組的學(xué)習(xí)產(chǎn)生一些疑問(wèn)。在這里我們就來(lái)了解一下VB.NET一維數(shù)組的具體用法，希望能對(duì)大家有所幫助。在VB.NET中數(shù)組的用法與VB 中有一點(diǎn)不同。#t#
首先在定義數(shù)組過(guò)程中，定義靜態(tài)數(shù)組語(yǔ)句是相同的
Dim data(10) as String
vb6中如上定義表示數(shù)組data()中有10個(gè)元素，下標(biāo)分別是0-9 而VB.NET中表示數(shù)組 data() 中有11個(gè)元素，下標(biāo)分別為0-10
VB.NET一維數(shù)組賦值： 我們可以對(duì)數(shù)組進(jìn)行單一的賦值，方法：
data(0)="一" ;data(1)="二";……
同樣我們也可以對(duì)數(shù)組進(jìn)行一次性的賦值，VB6.0中我們可以用 Array函數(shù)進(jìn)行賦值，如：
Dim data
data=Array(1,2,3,4,5,6,7,8)
但VB.net中以上函數(shù)不可用， 這樣我們可以創(chuàng)建一個(gè)函數(shù)來(lái)對(duì)VB.NET一維數(shù)組進(jìn)行一次性賦值，以下是我編寫(xiě)的一個(gè)函數(shù)，供大家參考：
- 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
通過(guò)調(diào)用以上的函數(shù)可以對(duì)VB.NET一維數(shù)組進(jìn)行一次性的賦值：
Call SetArrayData(data,"0","1","2","3","4","5")
返回的結(jié)果data()中下標(biāo)為0-5 分別賦值為0，1，2，3，4，5
