91超碰碰碰碰久久久久久综合_超碰av人澡人澡人澡人澡人掠_国产黄大片在线观看画质优化_txt小说免费全本

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

VB.NET中如何使用一維數組

發布時間:2021-07-20 11:35:27 來源:億速云 閱讀:166 作者:Leah 欄目:編程語言

這篇文章將為大家詳細講解有關VB.NET中如何使用一維數組,文章內容質量較高,因此小編分享給大家做個參考,希望大家閱讀完這篇文章后對相關知識有一定的了解。

首先在定義數組過程中,定義靜態數組語句是相同的

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一維數組進行一次性賦值,以下是我編寫的一個函數,供大家參考:

  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中如何使用一維數組就分享到這里了,希望以上內容可以對大家有一定的幫助,可以學到更多知識。如果覺得文章不錯,可以把它分享出去讓更多的人看到。

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

吐鲁番市| 许昌县| 连南| 天门市| 南木林县| 永州市| 杭锦后旗| 汤原县| 简阳市| 江源县| 阜平县| 定安县| 仁化县| 大姚县| 宣武区| 清徐县| 东宁县| 烟台市| 奉节县| 阳原县| 齐河县| 霞浦县| 保山市| 搜索| 城步| 万载县| 泗阳县| 莱西市| 芜湖市| 鄂伦春自治旗| 云梦县| 连平县| 当涂县| 五河县| 新营市| 潞西市| 承德县| 南城县| 花莲市| 夏津县| 平乡县|