十年網(wǎng)站開發(fā)經(jīng)驗 + 多家企業(yè)客戶 + 靠譜的建站團隊
量身定制 + 運營維護+專業(yè)推廣+無憂售后,網(wǎng)站問題一站解決
使用動態(tài)定義

成都創(chuàng)新互聯(lián)公司主營柘城網(wǎng)站建設的網(wǎng)絡公司,主營網(wǎng)站建設方案,手機APP定制開發(fā),柘城h5小程序定制開發(fā)搭建,柘城網(wǎng)站營銷推廣歡迎柘城等地區(qū)企業(yè)咨詢
ReDim a() AS **********'定義一個動態(tài)數(shù)組
...........
計算出第一個Y
ReDim a(0)
a(0)=Y
.....................
計算出第二個Y
ReDim Preserve a(1) '再次分配元素并保留原有元素
a(1) =Y
.........................
.........................
ReDim Preserve a(N) '第N次分配元素并保留原有元素
a(N) =Y
用一個帶括號的變量名來定義一維數(shù)組和多維數(shù)組如dim a(5) as integer '定義了1個1維、6個元素數(shù)組dim a(5,5) as integer '定義了1個2維、36個元素的數(shù)組
Sub?Main()
Dim?rand?As?New?Random
Dim?arr(15)?As?Integer
For?I?As?Integer?=?0?To?14
arr(I)?=?rand.Next(-200,?200)
Console.Write("{0}{1}",?arr(I),?vbTab)
If?(I?+?1)?Mod?5?=?0?Then
Console.WriteLine()
End?If
Next
Console.ReadLine()
End?Sub