【正文】
第 8章 數(shù)組的使用 ?人民郵電出版社 21世紀(jì)高等學(xué)校計(jì)算機(jī)基礎(chǔ)教育系列教材 數(shù)組的使用 數(shù)組的概念 數(shù)組與數(shù)組元素 數(shù)組是用一個(gè)統(tǒng)一的名稱表示的 、 順序排列的一組變量 。 數(shù)組中的變量稱為數(shù)組元素 , 用數(shù)字 ( 下標(biāo) ) 來(lái)標(biāo)識(shí)它們 , 因此數(shù)組元素又稱為下標(biāo)變量 。 數(shù)組的類型 數(shù)組的維數(shù) 固定大小的數(shù)組 數(shù)組的聲明 有 3種方法聲明固定大小的數(shù)組 , 用哪一種方法取決于數(shù)組應(yīng)用的有效范圍: l 建立公用數(shù)組 , 在模塊的通用段用 Public語(yǔ)句聲明數(shù)組 。 格式為 Public 數(shù)組名 (〈 維數(shù)定義 〉 ) [ As 〈 類型 〉 ] l 建立模塊級(jí)數(shù)組 , 在模塊的通用段用 Private或 Dim語(yǔ)句聲明數(shù)組 。格式為 Private | Dim 數(shù)組名 (〈 維數(shù)定義 〉 ) [ As 〈 類型 〉 ] l 建立局部數(shù)組 , 在過(guò)程中用 Dim或 Private語(yǔ)句聲明數(shù)組 。 格式為 Dim | Private 數(shù)組名 (〈 維數(shù)定義 〉 ) [ As 〈 類型 〉 ] 數(shù)組的使用 隨機(jī)產(chǎn)生 10個(gè)兩位整數(shù) , 找出其最大值 、 最小值和平均值 , 如圖所示 。 設(shè)計(jì)步驟如下: (1) 建立應(yīng)用程序用戶界面與設(shè)置對(duì)象屬性。 (2) 編寫代碼 。 隨機(jī)整數(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。 Str(a(i)) amp。 , Next = LTrim(Left(p, Len(p) – 1)) End Sub 求最大值、最小值和平均值 求最大 、 最小以及平均值由“ 確定 ” 按鈕 Command2 的Click事件代碼完成: Private Sub Command2_Click() Dim n As Integer, m As Integer, s As Single min = 100: max = 10: s = 0 For i = 1 To 10 If a(i) n Then max = a(i) If a(i) m Then min = a(i) s = s + a(i) Next = max = min = s / 10 End Sub “重置”按鈕 Command1的 Click事件代碼: Private Sub Command1_Click() Form_Load = = =