日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時間:8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
VB.NET一維數(shù)組簡單介紹

大家在對VB.NET的學習中可能會對數(shù)組的學習產(chǎn)生一些疑問。在這里我們就來了解一下VB.NET一維數(shù)組的具體用法,希望能對大家有所幫助。在VB.NET中數(shù)組的用法與VB 中有一點不同。#t#

首先在定義數(shù)組過程中,定義靜態(tài)數(shù)組語句是相同的

Dim data(10) as String

vb6中如上定義表示數(shù)組data()中有10個元素,下標分別是0-9 而VB.NET中表示數(shù)組 data() 中有11個元素,下標分別為0-10

VB.NET一維數(shù)組賦值: 我們可以對數(shù)組進行單一的賦值,方法:

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

同樣我們也可以對數(shù)組進行一次性的賦值,VB6.0中我們可以用 Array函數(shù)進行賦值,如:

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

但VB.net中以上函數(shù)不可用, 這樣我們可以創(chuàng)建一個函數(shù)來對VB.NET一維數(shù)組進行一次性賦值,以下是我編寫的一個函數(shù),供大家參考:

 
 
 
  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 

通過調(diào)用以上的函數(shù)可以對VB.NET一維數(shù)組進行一次性的賦值:

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

返回的結(jié)果data()中下標為0-5 分別賦值為0,1,2,3,4,5


新聞名稱:VB.NET一維數(shù)組簡單介紹
新聞來源:http://www.5511xx.com/article/djcghod.html