【正文】
隨機整數(shù)的生成由窗體的 Load事件代碼完成: Private Sub Form_Load() Dim p As String Randomize p = For i = 1 To 10 a(i) = Int(Rnd * 90) + 10 p = p amp。格式為 Private | Dim 數(shù)組名 (〈 維數(shù)定義 〉 ) [ As 〈 類型 〉 ] l 建立局部數(shù)組 , 在過程中用 Dim或 Private語句聲明數(shù)組 。 第 8章 數(shù)組的使用 ?人民郵電出版社 21世紀高等學校計算機基礎教育系列教材 數(shù)組的使用 數(shù)組的概念 數(shù)組與數(shù)組元素 數(shù)組是用一個統(tǒng)一的名稱表示的 、 順序排列的一組變量 。 格式為 Public 數(shù)組名 (〈 維數(shù)定義 〉 ) [ As 〈 類型 〉 ] l 建立模塊級數(shù)組 , 在模塊的通用段用 Private或 Dim語句聲明數(shù)組 。 (2) 編寫代碼 。結果見圖: ‘交換按鈕的代碼: Private Sub Command1_Click() For i = 1 To 10 \ 2 temp = s(i) s(i) = s(10 i + 1) s(10 i + 1) = temp Next i For i = 1 To 10 = amp。 Next i End Sub ‘初始化數(shù)組元素,可以使用InputBox()函數(shù)來輸入數(shù)組元素 Private Sub Form_Load() For i = 1 To 10 s(i) = 2 * i 1 Next i End Sub 數(shù)組排序 排序就是將一組數(shù)據(jù)按照遞增或者遞減的次序排列。 選擇法排序 的思想是: ( 1)對于有 n個數(shù)的序列,從中選出最大的一個數(shù)與第一個數(shù)交換; ( 2)從除去第一個數(shù)的 n1個數(shù)中在按照步驟( 1)選出最大的數(shù)和數(shù)組序列的第二個數(shù)交換;一直重復第( 1)步 n1次,最后構成遞減數(shù)列。例如: Dim a( 2) Dim b( 3) Dim obj() c = Array( 10, 11, 12, 13) d = Array(‘ a’,‘ b’,‘ c’,‘ d’,‘ e’) b = c ‘這一句是錯誤的,因為 b是一個固定大小的數(shù)組 a = c ‘錯誤, a的大小固定,且數(shù)組元素個數(shù)也不等 obj = c ‘正確 c = d ‘正確,因為此處 c的大小不固定 但是下面程序段是正確的: for I=0 to 3 b( I) =d( I) next I 動態(tài)數(shù)組的使用 在聲明中不給出數(shù)組的大小(省略數(shù)組聲明中括號中的下標),當要使用它的時候,隨時可以用 ReDim語句來重新定義該數(shù)組的大小。例如: