第8章數(shù)組的使用-文庫吧
2024-09-08 15:42 本頁面
【正文】 End Sub 最后是“關(guān)閉”按鈕 Command3的Click事件代碼： Private Sub Command3_Click() Unload Me End Sub 交換數(shù)組中各元素 交換的要求就是將數(shù)組的第一個元素和最后一個元素交換，第二個元素和倒數(shù)第二個元素交換，依此類推。結(jié)果見圖： ‘交換按鈕的代碼： 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。 s(i) amp。 Next i End Sub ‘退出按鈕的代碼： Private Sub Command2_Click() End End Sub ‘初始化按鈕的代碼： Private Sub Command3_Click() For i = 1 To 10 = amp。 s(i) 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ù)按照遞增或者遞減的次序排列。排序的方法有很多種，常用的有選擇法，冒泡法，插入法以及合并排序等等，其中最簡單的是選擇法。在這里主要介紹選擇法和冒泡法。 選擇法排序：對一組數(shù)組中的 n個數(shù)，用選擇法按照遞減的順序排列。 選擇法排序 的思想是： （ 1）對于有 n個數(shù)的序列，從中選出最大的一個數(shù)與第一個數(shù)交換； （ 2）從除去第一個數(shù)的 n1個數(shù)中在按照步驟（ 1）選出最大的數(shù)和數(shù)組序列的第二個數(shù)交換；一直重復(fù)第（ 1）步 n1次，最后構(gòu)成遞減數(shù)列。 原始數(shù)組 8 6 9 2 3 A(1) a(2) a(3) a(4) a(5) 第一遍交換 9 6 8 2 3 A(1) a(2) a(3) a(4) a(5) 第二遍交換 9 8 6 2 3 A(1) a(2) a(3) a(4) a(5) 第三遍交換 9 8 6 2 3 A(1) a(2) a(3) a(4) a(5) 第四遍交換 9 8 6 3 2 選擇法的算法程序通用代碼 for I=1 to n1 imin = I for j=I+1 to n if s(j) s(imin) then imin=j next j temp = s(imin) s(imin) = s(I) s(I) = temp
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號-1