亚洲激情专区-91九色丨porny丨老师-久久久久久久女国产乱让韩-国产精品午夜小视频观看

溫馨提示×

溫馨提示×

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

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

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

长乐市| 崇州市| 育儿| 额尔古纳市| 大名县| 平利县| 资阳市| 望奎县| 彰化市| 进贤县| 洛隆县| 富裕县| 柳州市| 时尚| 丹东市| 罗山县| 师宗县| 鸡泽县| 昆山市| 玛纳斯县| 兰坪| 克拉玛依市| 军事| 阿尔山市| 威海市| 铜鼓县| 方正县| 邮箱| 绵竹市| 武陟县| 通山县| 高清| 霍山县| 双鸭山市| 司法| 汉源县| 吉安县| 突泉县| 察隅县| 祁门县| 楚雄市|