【正文】
Dim sa() AS Integer Private Sub Form_click() ReDim sa( 4,8) …… End Sub 二維數(shù)組 二維數(shù)組就是有兩個(gè)下標(biāo)的數(shù)組,用來表示一些分組的元素。 將一個(gè)二維數(shù)組行和列元素交換,存到另一個(gè)二維數(shù)組中 ‘定義兩個(gè)數(shù)組變量和兩個(gè)計(jì)數(shù)器變量 Dim a(1 To 2, 1 To 3) AS Integer Dim b(1 To 3, 1 To 2) AS Integer Dim i, j AS Integer ‘程序裝入時(shí)輸入數(shù)組元素,本例中分別輸入 ‘ 12, 34, 56, 78, 89, 90 Private Sub Form_Load() For i = 1 To 2 For j = 1 To 3 a(i, j)=InputBox(請(qǐng)輸入第 amp。 個(gè)元素 ) Next j Next i End Sub ‘轉(zhuǎn)置按鈕的代碼: Private Sub Command1_Click() For i = 1 To 2 For j = 1 To 3 = amp。 Chr(10) Next i For i = 1 To 3 : For j = 1 To 2 = amp。 Chr(10) Next i End Sub ‘退出按鈕的代碼: Private Sub Command2_Click() End End Sub 多維數(shù)組 前面講過,在 Visual Basic 中,最多允許有 60維的數(shù)組,但是在使用中并不能使用這么龐大的數(shù)組,因?yàn)檫@么龐大的數(shù)組已經(jīng)遠(yuǎn)遠(yuǎn)超出了人們能夠理解的范圍,人們現(xiàn)實(shí)生活中都是生活在三維空間中的,所以人們很少去使用超過三維以上的數(shù)組,用戶在使用多維數(shù)組的時(shí)候,可以和前面講過的聲明二維數(shù)組的方法一樣來聲明多維數(shù)組,也就是它的使用格式是: Dim 數(shù)組名(下標(biāo) 1[,下標(biāo) 2,下標(biāo) 3…] ) [AS 類型 ] 當(dāng)然多維數(shù)組也可以有動(dòng)態(tài)數(shù)組,它的使用方法和二維數(shù)組的使用完全一樣,因?yàn)槎S數(shù)組是一個(gè)最簡(jiǎn)單的多維數(shù)組。然后對(duì)這些數(shù)字鍵可以采用同一段代碼來實(shí)現(xiàn)數(shù)字的鍵入。在使用了 Erase函數(shù)后,這個(gè)數(shù)組的元素就不能再被引用了,要想重新使用這個(gè)數(shù)組的元素話,就必須用 ReDim語句或Array語句來重新聲明。 i Next i End Sub 名稱( name) 下標(biāo)( index) 標(biāo)題( caption) 可見( visible) file file true ne new true ope open true clo close true hex true f 04 false He1 true ext exit true 用 For Each...Next訪問數(shù)組元素 對(duì)數(shù)組中的每個(gè)元素進(jìn)行相加,然后輸出計(jì)