VB6阵列与副程式.PPT

VB6 陣列與副程式 陣列(Array) 假設，當我們要連續輸入全班25位同學的各科成績時，在之前教過的方法中，我們可以宣告單一變數的方式宣告—國文chi，英文eng，數學math；當輸入並計算完第一位同學的成績後，緊接著輸入第二位同學…第三位同學…一直到第25位同學，很高興都計算完，此時問題來了，倘若此時要你查詢某位同學的各科成績，並在螢幕上顯示出來，你該如何？ 陣列(續) 陣列(續) 為達目的，因此我們不擇手段地連續使用chi1~chi5、eng1~eng5、math1~math5這些變數來儲存各項成績 問題來了，雖然每個數值都存在記憶體中，要找第二個同學的成績時，程式設計又是一個繁複的問題 陣列(續) 陣列(續) 陣列就是 容許使用同一個名稱來處理多個數值 一群性質相同的資料數值的集合 亦即，其所含有之元素皆具有相同的型別，因此在一個陣列中同時含有整數與文字是不可能的 所以，陣列為存放在連續記憶體中某一型態變數值的集合 陣列(續) 陣列中的每個元件相當於一個變數，在陣列中存取變數只需要指定索引值即可 陣列使用前是必須宣告的 語法 功能 宣告為所指定資料型態的一維（二維…）陣列 陣列(續) 如果我這樣宣告，記憶體會如何配置？ 陣列(續) 前一張投影片告訴我們，一維陣列宣告後，其索引值是從0開始，有些人並不習慣這要的開頭，既然宣告陣列大小為5，又何必預留6個位置？假如從1開始到5，不是正好符合我們的宣告大小嗎？ Option Base 陣列(續) Dim 陣列名稱 (上界 To 下界[,上界 To 下界…]) [As 資料型態] 陣列(續) 宣告陣列後，若要指定起始值給陣列，可以用右列的方法 或是 Array函數 陣列(續) For Each … Next 陣列迴圈 語法 功能 以所指定的陣列元件數目，重複執行某個敘述區段 陣列(續) 二維陣列 一個陣列若具有兩個索引稱為二維陣列 常用於數學的矩陣、學生成績單、各式報表… 可將其視為由列(row)及行(column)組合而成的資料表單 語法 Dim 陣列名稱(索引1, 索引2) [as 資料型態] 功能 宣告為二維陣列 陣列(續) 有時候在程式執行了一段時間後，才能決定陣列的大小，無法在程式一開始執行時決定，此時該如何是好？ 動態陣列宣告 在程式未執行前並未配置任何記憶體給該陣列，而是等到程式執行到該宣告時，才會要求系統配置記憶體給該陣列使用 以Dim來宣告空維數陣列 再以ReDim來宣告大小以配置元件的數目 陣列(續) 清除陣列 以往清除陣列的方式 以Erase清除陣列內容 語法 Erase 陣列名稱 功能 使用Erase可將動態陣列釋放掉或將靜態陣列清為預設值 牛刀小試(1) 設計一程式，完成兩個陣列相加的動作 必須是相同規格的陣列才可進行相加的動作 牛刀小試(1)—續 牛刀小試(2) 設計一程式，完成兩個陣列相加的動作 牛刀小試(2)—續 牛刀小試(2)—續 牛刀小試(3) 設計一程式，完成兩個陣列相乘的動作 A、B兩陣列要能相乘，必須令A的行與B的列相等，亦即A(i,j)*B(j,k)=C(i,k) 牛刀小試(3)---續 牛刀小試(3)---續 牛刀小試(3)---續 牛刀小試(4) 設計一程式，完成兩個陣列相乘的動作 牛刀小試(4)---續 牛刀小試(5) 設計一程式，可輸入全班同學成績，並計算平均與總分 牛刀小試(5)---續 牛刀小試(5)---續 牛刀小試(5)---續 副程式(Subprogram) 撰寫程式時，將某一段具有特定功能的敘述區段單獨抽取出來，另行編寫成程式單元，給予特定名稱，以方便其他程式的呼叫使用 種類 內建函數(Built-in Function) 程序(Procedure) 事件程序 一般程序 Sub … End Sub Function … End Function 次常式(GoSub…Return) 副程式(續) Sub程序 語法 副程式(續) 呼叫副程式 Call敘述 語法 牛刀小試(6) 試設計一程式，以副程式方式設計九九乘法表 牛刀小試(6)---續 副程式(續) Function程序 語法 副程式(續) 呼叫函數 三角函數的使用 VB所提供的三角函數 Sin(弳度) Cos(弳度) Tan(弳度) 副程式(續) 次常式(Subroutine) 語法 呼叫次常式 牛刀小試(7) 試以次常式方式設計一繪製同心圓個數的程式 參數傳遞的方式 傳值呼叫(Call by Value) 參數傳遞的方式(續) 傳址呼叫(Call by Address/Reference) 牛刀小試(8) 範例一(選擇排序法) 是目前最簡單的排序方法之一 步驟 從全部N個資料中，選取最小的一個將它與陣列中第一個位置的數字交