Dim x(8, 8)
創(chuàng)新互聯(lián)為企業(yè)級(jí)客戶提高一站式互聯(lián)網(wǎng)+設(shè)計(jì)服務(wù),主要包括網(wǎng)站建設(shè)、做網(wǎng)站、成都App定制開(kāi)發(fā)、微信平臺(tái)小程序開(kāi)發(fā)、宣傳片制作、LOGO設(shè)計(jì)等,幫助客戶快速提升營(yíng)銷(xiāo)能力和企業(yè)形象,創(chuàng)新互聯(lián)各部門(mén)都有經(jīng)驗(yàn)豐富的經(jīng)驗(yàn),可以確保每一個(gè)作品的質(zhì)量和創(chuàng)作周期,同時(shí)每年都有很多新員工加入,為我們帶來(lái)大量新的創(chuàng)意。
Dim a As Integer
Dim b As Integer
b = 0
For i = 0 To 8
For j = 0 To 8
If b = 3 Then
b = 1
a = a + 1
Else
b = b + 1
End If
x(i, j) = aNext
Next
1、點(diǎn)擊VS工具。
2、打開(kāi)后,新建一個(gè)Windows窗體應(yīng)用程序。
3、新建完畢后,如圖所示。
4、拖動(dòng)一個(gè)按鈕。
5、定義數(shù)組最常見(jiàn)的方法,如圖示。
6、運(yùn)行后,點(diǎn)擊按鈕,彈出提示正常。
7、定義數(shù)組第二種方法,屬于動(dòng)態(tài)的方法。
8、運(yùn)行后,點(diǎn)擊按鈕,數(shù)組成功輸出。
Dim n, i, j As Integer
'這里你用的是默認(rèn)的值,所以N是0,這樣,下面的那句話就成了
Dim a(n - 1, n - 1) As Long
'Dim a(0-1,0-1) As Long 也就是 Dim a(-1,-1) As Long
以后調(diào)用的時(shí)候肯定會(huì)出錯(cuò)