第8章數(shù)組的使用-文庫吧在線文庫
【正文】 and1_Click() ‘單擊命令按鈕對(duì)數(shù)組元素進(jìn)行求和，輸出計(jì)算結(jié)果。其余部分通過程序來實(shí)現(xiàn)。會(huì)出現(xiàn)如圖，單擊“是”按鈕進(jìn)行創(chuàng)建控件數(shù)組。 “ “ ： b(j, i) = a(i, j) Next j = amp。對(duì)于二維數(shù)組來說，數(shù)組的元素個(gè)數(shù)就是（下標(biāo) 1上界 下標(biāo) 1下界 +1） *（下標(biāo) 2上界 下標(biāo) 2下界 +1）個(gè)。 下面是實(shí)現(xiàn) 冒泡排序的通用程序段 ：為了通用性更強(qiáng)，這里給出含有 n個(gè)元素的數(shù)組的排序程序代碼： For I = n1 to 1 step –1 For j=1 to I If S（ j） S(j+1) then Temp =S(j) S(j)=s(j+1) S(j+1) = Temp End If Next j Next I 數(shù)組的復(fù)制 “復(fù)制數(shù)組”是指將整個(gè)數(shù)組的內(nèi)容復(fù)制到另一個(gè)數(shù)組中。 Next i End Sub ‘退出按鈕的代碼： Private Sub Command2_Click() End End Sub ‘初始化按鈕的代碼： Private Sub Command3_Click() For i = 1 To 10 = amp。 格式為 Dim | Private 數(shù)組名 (〈 維數(shù)定義 〉 ) [ As 〈 類型 〉 ] 數(shù)組的使用 隨機(jī)產(chǎn)生 10個(gè)兩位整數(shù) ， 找出其最大值 、 最小值和平均值 ， 如圖所示 。 數(shù)組的類型 數(shù)組的維數(shù) 固定大小的數(shù)組 數(shù)組的聲明 有 3種方法聲明固定大小的數(shù)組 ， 用哪一種方法取決于數(shù)組應(yīng)用的有效范圍： l 建立公用數(shù)組 ， 在模塊的通用段用 Public語句聲明數(shù)組 。 , 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_Clic
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1