VB第5章數(shù)組課件

1、 Visual Basic 程序設(shè)計(jì)任務(wù)5 數(shù)組1.了解數(shù)組的基本概念2.熟練掌握一維數(shù)組的使用方法 3.掌握數(shù)組的基本操作 4.靈活應(yīng)用靜態(tài)數(shù)組與動(dòng)態(tài)數(shù)組 5.掌握數(shù)組的常用算法本章學(xué)習(xí)目標(biāo)6.掌握用戶自定義類型的基本用法 教學(xué)重點(diǎn)數(shù)組和控件數(shù)組的應(yīng)用教學(xué)難點(diǎn)控件數(shù)組5.1 數(shù)組的概念引例1.己知50名學(xué)生的一門課成績(jī)，要求找出高于平均分的所有學(xué)生的成績(jī)。2.輸入50個(gè)數(shù)，要求程序按輸入時(shí)的逆序把這50個(gè)數(shù)輸出來(lái)。即按輸入時(shí)的相反順序輸出這50個(gè)數(shù)。 少量的數(shù)據(jù)可以使用簡(jiǎn)單變量方便地存取或處理。若數(shù)據(jù)量很大，采用這種處理方法幾乎是難以做到的。而數(shù)組可以很方便地處理這種大量的數(shù)據(jù) 。數(shù)組是一組

2、按一定規(guī)律進(jìn)行排列的相同類型變量的集合。 數(shù)組用于表示一組性質(zhì)相同的有序的數(shù)，這一組數(shù)用一個(gè)統(tǒng)一的名稱來(lái)代替，稱為數(shù)組名。數(shù)組名的命名規(guī)則與簡(jiǎn)單變量的命名規(guī)則相同。 數(shù)組中的每一個(gè)變量稱為數(shù)組元素。為了在處理時(shí)能夠區(qū)分?jǐn)?shù)組中的每一個(gè)元素，需要用一個(gè)索引號(hào)加以區(qū)別，該索引號(hào)稱為下標(biāo)。數(shù)組中的每一個(gè)元素可以用數(shù)組名和下標(biāo)唯一表示，寫成：數(shù)組名(下標(biāo))。 數(shù)組元素在程序中的使用與簡(jiǎn)單變量類似，在簡(jiǎn)單變量允許出現(xiàn)的地方也允許出現(xiàn)數(shù)組元素。所以，數(shù)組元素又稱為下標(biāo)變量。 表示數(shù)組元素時(shí)，應(yīng)注意1)需用圓括號(hào)也只能用把下標(biāo)括起來(lái)。2)下標(biāo)可以是常量、符號(hào)常量或表達(dá)式，其值必須是整數(shù)。3)下標(biāo)的最小值稱為下

3、界，下標(biāo)的最大值稱為上界。在沒(méi)有任何說(shuō)明的情況下，數(shù)組的下界默認(rèn)值為0。例如dim score(48) as single(integer) Option Base 1 一個(gè)班(48個(gè))學(xué)生的成績(jī) Score或30種圖書的名字 BookName或100種商品的價(jià)格 Cost數(shù)組元素?cái)?shù)組中的各個(gè)變量，使用唯一的下標(biāo)（索引）來(lái)標(biāo)識(shí)。Score(1)、 Score(2)Score(48)或BookName(0) BookName(29)或Cost(0) Cost(99)5.2 數(shù)組的定義5.2.1 定義數(shù)組的一般格式Dim 數(shù)組名(第一維說(shuō)明 ，第二維說(shuō)明) As 類型名稱說(shuō)明：(1) 數(shù)組須先定義

4、后使用，未定義不能使用。(2) 格式中的部分為可選部分。(3) 省略 As 類型名稱定義數(shù)組，默認(rèn)為變體類型的數(shù)組。(4) 維說(shuō)明的形式為：下標(biāo)下界 to 下標(biāo)上界 其中當(dāng)下標(biāo)的下界為默認(rèn)值0時(shí)，可以省略不寫(5) 也可以下面方式定義下標(biāo)下界的默認(rèn)值：Option Base n （其中n為0或1）。(6) 用Dim語(yǔ)句定義數(shù)組時(shí)，該語(yǔ)句把數(shù)組元素初始化為0或空字符串。(7) 在同一過(guò)程中，數(shù)組名不能與其他數(shù)組名或變量名相同。數(shù)組的維數(shù) 一個(gè)數(shù)組元素只有一個(gè)下標(biāo)，則稱為一維數(shù)組。例如，要表示某班40名同學(xué)的英語(yǔ)成績(jī)可以表示成G(1)、G(2)、G(3)G(40)。 用兩個(gè)下標(biāo)來(lái)表示的數(shù)組稱為二維

5、數(shù)組。對(duì)于可以表示成表格形式的數(shù)據(jù)，如矩陣、行列式等，用二維數(shù)組來(lái)表示則比較方便。例如，要表示六個(gè)班(各班40人)共240個(gè)學(xué)生的英語(yǔ)成績(jī)，就可以用二維數(shù)組表示G(6,40)，第一個(gè)下標(biāo)表示班級(jí)，第二個(gè)下標(biāo)表示學(xué)號(hào)，則一班30號(hào)學(xué)生的成績(jī)可以表示成G(1,30)。 根據(jù)需要，還可以使用三維數(shù)組、四維數(shù)組等，VB最多允許有60維。5.2.2 數(shù)組的引用引用數(shù)組元素的格式 數(shù)組名(下標(biāo)1,下標(biāo)2)說(shuō)明：(1) 在程序中，凡是能用變量的地方，都可用數(shù)組元素來(lái)替換。(2) 引用數(shù)組元素時(shí)，要注意數(shù)組名、類型及維數(shù)要與定義的一致。(3) 數(shù)組元素的下標(biāo)要在定義的范圍之內(nèi)，否則出現(xiàn)下標(biāo)越界錯(cuò)誤。 一般通過(guò)

6、循環(huán)語(yǔ)句及InputBox函數(shù)給數(shù)組輸入數(shù)據(jù)。數(shù)組的輸出一般用Print方法、標(biāo)簽或文本框?qū)崿F(xiàn)。賦值For i = 1 To 10 a(i) = Val(InputBox(輸入第 & i & 個(gè)數(shù))Next i輸出For i = 1 To 10 Print a(i);Next i5.2.3 數(shù)組的賦值和輸出對(duì)輸入的20個(gè)整數(shù)按每行5個(gè)數(shù)的格式輸出。例 5-1 Private Sub Command1_Click() Dim b(20) As Integer, i% For i = 1 To 20 b(i) = InputBox(請(qǐng)輸入一個(gè)整型數(shù)) Next i For i = 1 To 20

7、Print b(i); If i Mod 5 = 0 Then Print Next iEnd Sub由鍵盤輸入10個(gè)數(shù)，再逆序輸出。例 5-2 Private Sub Command1_Click()Dim a(10) As Integer, i%Print 輸入的數(shù)據(jù)為For i = 1 To 10 a(i) = InputBox(請(qǐng)輸入第& i &個(gè)數(shù)) Print a(i), Next i End SubPrivate Sub Command2_Click()Dim a(10) As Integer, i%PrintPrint 逆序輸出為For i = 10 To 1 step -1

8、Print a(i),Next iEnd Sub由鍵盤上輸入40人的考試成績(jī)，輸出高于平均成績(jī)的分?jǐn)?shù)。例 5-3分析：該問(wèn)題需處理三部分，一輸入40個(gè)人的成績(jī)；二求平均分；三把這40個(gè)分?jǐn)?shù)逐一和平均成績(jī)進(jìn)行比較，若高于平均成績(jī)，則輸出。程序代碼如下：Private Sub Command1_Click()Dim score(40) As Single, aver!, i% aver = 0For i = 1 To 40 score(i) = InputBox(請(qǐng)輸入成績(jī)) aver = aver + score(i)Next iaver = aver / 40For i = 1 To 40 I

9、f score(i) aver Then Print score(i)Next iEnd Sub定義一個(gè)可存放不同類型數(shù)據(jù)的一維數(shù)組并輸出。例 5-4 Option Base 1Private Sub Command1_Click()Dim abc(4)abc(1)=dateabc(2)=你的考試得了abc(3)=100abc(4)=分PrintFor i=1 To 4Print abc(i)Next iEnd Sub5.2.4 二維數(shù)組的定義和引用1.二維數(shù)組定義格式 Dim 數(shù)組名(下標(biāo)1，下標(biāo)2) As 類型名稱說(shuō)明：（1）兩個(gè)下標(biāo)形式為：下標(biāo)下界 To 上界，如果下標(biāo)下界省略，則下標(biāo)下

10、界默認(rèn)為0。如果之前用Option Base 1 說(shuō)明，則下標(biāo)下界默認(rèn)值為1。（2）二維數(shù)組可以形象地用平面的二維表格來(lái)表示，表格的行數(shù)和列數(shù)就是數(shù)組地第一個(gè)下標(biāo)和第二個(gè)下標(biāo)地取值個(gè)數(shù)，同一行上的元素，第一個(gè)下標(biāo)是相同的，同一列上的元素，第二個(gè)下標(biāo)是相同的。（3）二維數(shù)組的元素個(gè)數(shù)為（上界1-下界11）（上界2-下界21）2.二維數(shù)組的引用引用形式：數(shù)組名（下標(biāo)1，下標(biāo)2）說(shuō)明：習(xí)慣上將下標(biāo)1為行下標(biāo)，下標(biāo)2為列下標(biāo)。例如：a(1,2)為數(shù)組第二行第三列的元素。 二維數(shù)組的下標(biāo)范圍由下標(biāo)的下界和上界來(lái)確定，下界和上界可以是任何整型常量或常量表達(dá)式。 如：Dim aa(2，3) as integ

11、eraa(0,0)aa(0,1)aa(0,2)aa(0,3)aa(1,0)aa(1,1)aa(1,2)aa(1,3)aa(2,0)aa(2,1)aa(2,2)aa(2,3) 又如：Dim aa(-1 to 1,-2 to 1)aa(-1,-2)aa(-1,-1)aa(-1,0)aa(-1,1)aa(0,-2)aa(0,-1)aa(0,0)aa(0,1)aa(1,-2)aa(1,-1)aa(1,0)aa(1,1)3.二維數(shù)組的賦值可以通過(guò)循環(huán)語(yǔ)句賦值：例如： for i=0 to 2 for j=0 to 3 a(i,j)=int(rnd*100) next j next i LBound函數(shù)和

12、UBound函數(shù)格式： LBound(數(shù)組名，維) UBound(數(shù)組名，維)說(shuō)明： (1) 數(shù)組名是要測(cè)試的數(shù)組。 (2) LBound函數(shù)返回?cái)?shù)組的下界值，UBound函數(shù)返回?cái)?shù)組的上界值。 (3) 一維數(shù)組可省略，維，二維數(shù)組必須指定LBound(aa,2)表示測(cè)試aa數(shù)組的第二維下界，其值為：-2。 UBound(aa,1)表示測(cè)試aa數(shù)組的第一維上界，其值為：1。 5.2.5 數(shù)組下標(biāo)的界值 用LBound函數(shù)和UBound函數(shù)改寫例4-4。例 5-5Option Base 1Private Sub Command1_Click()Dim abc(4)abc(1)=dateabc(2

13、)=你的考試得了abc(3)=100abc(4)=分PrintFor i=LBound To UBound(abc)Print abc(i) Next iEnd Sub5.3 靜態(tài)數(shù)組動(dòng)態(tài)數(shù)組5.3.1.靜態(tài)數(shù)組靜態(tài)數(shù)組的二種形式:用Dim語(yǔ)句所定義的數(shù)組。用Static語(yǔ)句定義的數(shù)組。兩者的區(qū)別：(1) Static語(yǔ)句只能出現(xiàn)在過(guò)程中，Dim 語(yǔ)句不僅可以出現(xiàn)在過(guò)程中，還可以出現(xiàn)在通用聲明中。(2) 在過(guò)程中用Dim語(yǔ)句定義的數(shù)組，過(guò)程執(zhí)行結(jié)束后將釋放內(nèi)存空間。(3) 在過(guò)程中用Static語(yǔ)句定義的數(shù)組，過(guò)程執(zhí)行結(jié)束后將不會(huì)釋放內(nèi)存空間。 比較用Static語(yǔ)句定義的數(shù)組與用Dim語(yǔ)句定

14、義的數(shù)組之區(qū)別。單擊5次“打印”命令按鈕后的結(jié)果如圖所示.例 5-65.3.2.動(dòng)態(tài)數(shù)組(可調(diào)數(shù)組)定義可調(diào)數(shù)組分兩步：第一步：聲明一個(gè)沒(méi)有下標(biāo)參數(shù)的數(shù)組。格式： Dim 數(shù)組名( ) As 類型第二步：引用數(shù)組前用 ReDim語(yǔ)句重新定義。格式：ReDim Preserve 數(shù)組名(下界 to 上界, 下界 to 上界) As 類型例如：Private Sub Command1_Click()Dim a() As Integer Dim n%n = Val(InputBox(input n)ReDim a(n) End Sub可調(diào)數(shù)組說(shuō)明(1) 在過(guò)程中，可多次用ReDim語(yǔ)句來(lái)改變數(shù)組的大

15、小，也可改變數(shù)組的維數(shù)，但不能改變數(shù)組的類型。(2) 若不指定Preserve保留字，在執(zhí)行ReDim語(yǔ)句時(shí)，數(shù)組中原來(lái)所存放的值將全部丟失。(3) 指定Preserve保留字，在執(zhí)行ReDim語(yǔ)句時(shí)，數(shù)組中原來(lái)所存放的值將不會(huì)丟失。但使用Preserve保留字后，只能改變最后一維的大小，前幾維的大小不能改變。 通過(guò)輸入對(duì)話框輸入一批成績(jī)，把及格的和不及格的成績(jī)分別存放在數(shù)組a和b中，并以每行5 個(gè)數(shù)據(jù)的形式輸出數(shù)組a和b。輸入-1時(shí)程序結(jié)束。例 5-6 數(shù)組是一種構(gòu)造類型，數(shù)組名通常是整個(gè)數(shù)組的標(biāo)識(shí)，對(duì)數(shù)組的操作實(shí)際上是對(duì)數(shù)組元素的操作?；静僮饕话闶侵笇?duì)數(shù)組元素所進(jìn)行的輸入和輸出，即如何給

16、數(shù)組元素賦值，又如何將數(shù)組元素的值顯示在窗體上或控件上。 5.4 數(shù)組的基本操作方法一用循環(huán)結(jié)構(gòu)及InputBox函數(shù)給數(shù)組元素賦值由鍵盤輸入10個(gè)數(shù)據(jù)，分別統(tǒng)計(jì)正數(shù)之和及負(fù)數(shù)之和。例 5-75.4 .1.數(shù)組元素的輸入例 5-8方法二用數(shù)組名直接賦值用靜態(tài)數(shù)組ww元素的值給動(dòng)態(tài)數(shù)組yy賦值。Option Base 1Private Sub Command1_Click()Dim ww(4) as integerDim yy() as integer yy為動(dòng)態(tài)數(shù)組For i=1 To 5Next iyy=ww 用ww給yy賦值print yy(i)next iEnd Sub例5-8說(shuō)明(1)

17、 通過(guò)數(shù)組名給數(shù)組名賦值的條件是：兩個(gè)數(shù)組的類型相同，且賦值號(hào)左邊為動(dòng)態(tài)數(shù)組，右邊為靜態(tài)數(shù)組。(2) 賦值號(hào)左邊的動(dòng)態(tài)數(shù)組，通過(guò)賦值確定大小。格式：數(shù)組變量名=Array（數(shù)組元素值）功能：將小括號(hào)中的數(shù)據(jù)依次賦給數(shù)組中的各元素。說(shuō)明： (1) 數(shù)組可以說(shuō)明成Variant類型或不說(shuō)明類型。 (2) 所聲明的數(shù)組為可調(diào)數(shù)組，圓括號(hào)可省略不寫 (3) 數(shù)組下標(biāo)的上界值由括號(hào)內(nèi)的參數(shù)個(gè)數(shù)決定 (4) Array函數(shù)只適用于一維數(shù)組。 (5) Array函數(shù)中的數(shù)組元素值之間以逗號(hào)分隔方法三用Array函數(shù)給數(shù)組元素賦值。用Array函數(shù)為數(shù)組C賦初值。例 5-9Private Sub Comman

18、d1_Click()Dim c as Variantc=Array(4,5,3,7,2,9) For i=LBound(c) To UBound(c)print c(i)Next iprintprint For i=0 To 5print c(i)next iEnd Sub 根據(jù)提示分別將5個(gè)數(shù)據(jù)通過(guò)文本框賦給一維數(shù)組w，單擊輸入框中的“確定”按鈕完成每次的輸入操作；單擊顯示框中的“確定”按鈕，在圖片框中輸出數(shù)組w中所有元素的值。例 5-10方法四將控件（對(duì)象）的屬性給數(shù)組元素賦值。如例5-9中的語(yǔ)句： For i = 0 To 5 Print c(i) Next i再如例5-10中的語(yǔ)句：

19、For i = 1 To 5 Picture1.Print ww(i) Next i是利用循環(huán)并結(jié)合Print語(yǔ)句將數(shù)組元素的值依次輸出在窗體上。是利用循環(huán)并結(jié)合Print語(yǔ)句將數(shù)組元素的值依次輸出在圖片框上。5.4 .2.數(shù)組元素的輸出方法一用print方法將數(shù)組元素的值直接輸出到窗體上或圖片框中。求數(shù)組中的最大元素及下標(biāo)。例 5-11方法二用賦值語(yǔ)句方法將數(shù)組元素的值顯示在標(biāo)簽、文本框中或其它控件上。格式：For Each 成員 in 數(shù)組Exit ForNext 成員功能：For Each Next 語(yǔ)句用于對(duì)數(shù)組或集合中的元素逐一進(jìn)行循環(huán)控制操作。方法三用For Each . Next

20、語(yǔ)句輸出。該語(yǔ)句的執(zhí)行過(guò)程：(1) 首先計(jì)算數(shù)組元素的個(gè)數(shù)，決定循環(huán)的次數(shù)(2) 每次執(zhí)行循環(huán)體之前先將數(shù)組的一個(gè)元素的值賦給成員，第一次是第一個(gè)數(shù)組元素，第二次是第二個(gè)數(shù)組元素，依次類推。(3) 執(zhí)行循環(huán)體后，轉(zhuǎn)到(2)。(4) 直到遍歷完每一個(gè)數(shù)組元素或遇到Exit For語(yǔ)句則退出該循環(huán)。說(shuō)明：(1)“成員”必須是一個(gè)變體變量名，為循環(huán)而設(shè)，表示某個(gè)數(shù)組元素的值。(2) “數(shù)組”僅為一個(gè)數(shù)組名，不需括號(hào)、上界、下界等。(3) 從For Each語(yǔ)句到Next語(yǔ)句之間的語(yǔ)句為循環(huán)體?？捎肊xit For語(yǔ)句直接跳出循環(huán)。用For Each Next 語(yǔ)句輸出數(shù)組元素。例 5-125.5 控

21、件數(shù)組控件數(shù)組的建立方法一1在界面設(shè)計(jì)時(shí)建立(1) 先創(chuàng)建數(shù)組中的第一個(gè)控件 (注意此時(shí)控件的Index屬性值為空) 。(2) 選取該控件復(fù)制，再粘貼。系統(tǒng)自動(dòng)提示：“是否創(chuàng)建一個(gè)控件數(shù)組嗎？”。(3) 單擊“是”按鈕，窗體上自動(dòng)增加一個(gè)屬性基本相同的控件（注意此時(shí)第一個(gè)控件的Index=0，新增控件的Index=1）。(4) 繼續(xù)粘貼，便會(huì)產(chǎn)生一系列屬性基本相同，而只有Index屬性不同的一組控件，即控件數(shù)組。1.控件數(shù)組的概念2.控件數(shù)組的建立5.5 控件數(shù)組1.控件數(shù)組的概念2.控件數(shù)組的建立 一組完成類似功能且類型相同的控件，將它們組合起來(lái)，以控件的名稱作為數(shù)組名，并給各個(gè)控件冠以不同

22、的下標(biāo)，所組成的數(shù)組，稱之為控件數(shù)組。數(shù)組中的某個(gè)元素，代表某一個(gè)具體的控件，所完成的功能與獨(dú)立的控件幾乎一樣。5.5 控件數(shù)組控件數(shù)組的建立方法二2在程序運(yùn)行時(shí)增加控件數(shù)組元素(1) 在窗體上添加第一個(gè)控件，將其Index屬性設(shè)置為0，Visible屬性設(shè)置為False。(2) 在編寫事件代碼中，用Load方法添加新的控件數(shù)組元素，并將其Visible屬性設(shè)置為True；用UnLoad方法可以刪除控件數(shù)組元素。(3) 設(shè)置其Left屬性和Top屬性。(4) 當(dāng)程序運(yùn)行時(shí)，則會(huì)根據(jù)編程中的命令，添加或刪除控件。1.控件數(shù)組的概念2.控件數(shù)組的建立5.5 控件數(shù)組1.控件數(shù)組的概念2.控件數(shù)組的

23、建立 建立一個(gè)含有三個(gè)命令按鈕的控件數(shù)組，當(dāng)單擊某個(gè)命令按鈕時(shí)，標(biāo)簽的背景分別顯示不同的顏色。例 5-135.5 控件數(shù)組Load語(yǔ)句和UnLoad語(yǔ)句Load語(yǔ)句的一般格式為：Load 控件數(shù)組名(下標(biāo)) 其中控件數(shù)組名為控件名稱，如：Label1、 Command1、Picture1等，下標(biāo)為1、2、3等。UnLoad語(yǔ)句的一般格式為：UnLoad 控件數(shù)組名(下標(biāo))1.控件數(shù)組的概念2.控件數(shù)組的建立5.5 控件數(shù)組 單擊“添加圖片”按鈕，在窗體上增加一幅圖片，單擊“刪除圖片”按鈕，在窗體上刪除一幅圖片，最多顯示四幅圖片。例 5-141.控件數(shù)組的概念2.控件數(shù)組的建立5.7 數(shù)組應(yīng)用舉例將輸入的一維數(shù)組的數(shù)據(jù)逆序存放并輸出。例 5-18例 5-18例 5-19例 5-20例 5-21例 5-2