VB之數組

1.動態數組 一直給每一個數組賦值，直到空的停止，最多a（0.1.2） 2.排序 Dim a(9) As Long Private Sub Command1_Click() Dim i As Long, j As Long, b As Long For i = 1 To 9 For j = 0 To 9 - i 'Debug.Print i If a(j) < a(j + 1) Then b =

>>阅读原文<<