Visual-Basic程序設(shè)計(jì)-數(shù)組課件

1、數(shù)組 數(shù)組的概念及定義8.1靜態(tài)數(shù)組與動(dòng)態(tài)數(shù)組 8.2數(shù)組的幾本操作 8.3 數(shù)組的應(yīng)用舉例8.4 控件數(shù)組8.58.1 數(shù)組的概念及定義 8.1.1 引例8.1.2 數(shù)組的定義8.1.3 默認(rèn)數(shù)組8.1.1 引例例8-1（參看教材P127）8.1.2 數(shù)組的定義 定義：在中，把一組具有相同名字、不同下標(biāo)的下標(biāo)變量稱為數(shù)組。 數(shù)組應(yīng)當(dāng)先定義后使用。定義中要聲明數(shù)組名、類型、維數(shù)及數(shù)組的大小。數(shù)組在計(jì)算機(jī)內(nèi)存中占據(jù)一塊區(qū)域，數(shù)組名是這個(gè)區(qū)域的名稱，區(qū)域的每個(gè)單元都有自己的地址，該地址用下標(biāo)表示。定義數(shù)組的目的就是通知計(jì)算機(jī)為其留出所需的內(nèi)存空間。 數(shù)組的維數(shù)也就是定義時(shí)下標(biāo)的個(gè)數(shù)。一個(gè)數(shù)組如果只

2、用一個(gè)下標(biāo)就能確定一個(gè)數(shù)組元素在數(shù)組中的位置，就稱為一維數(shù)組。如果要用兩個(gè)或多個(gè)下標(biāo)才能確定一個(gè)數(shù)組元素在數(shù)組中的位置，則稱為二維數(shù)組或多維數(shù)組。VB中的數(shù)組最多可以有60維。 在VB中，可以用4個(gè)語(yǔ)句來(lái)定義數(shù)組，它們的格式相同，但適用范圍不同。這4個(gè)語(yǔ)句為： Dim 用在窗體模塊或標(biāo)準(zhǔn)模塊中，也可以用于過(guò)程中 ReDim 用在過(guò)程中 Static 用在過(guò)程中 Public 用在標(biāo)準(zhǔn)模塊中，定義全局?jǐn)?shù)組 下面我們以Dim語(yǔ)句為例介紹數(shù)組定義的格式，其它語(yǔ)句定義數(shù)組的格式與Dim相同。在VB中可以用兩種格式定義數(shù)組： 1只給出每一維下標(biāo)的上界，即可以使用的下標(biāo)的最大值。格式如下： Dim 數(shù)組名

3、（第一維下標(biāo)上界，第二維下標(biāo)上界，） As 類型名稱 如： Dim Array(5) As Integer 定義了一個(gè)一維數(shù)組，該數(shù)組的名字為Array，類型為Integer，數(shù)組中共有6個(gè)元素：Array(0)，Array(1)，Array(2)，Array(3)，Array(4)，Array(5)。 再如： Dim Test(2,3) As Integer 上面定義了一個(gè)二維數(shù)組Test，該數(shù)組有3行4列共12個(gè)元素，即：Test(0,0)，Test(0,1)，Test(0,2)，Test(0,3)，Test(1,0)，Test(1,1)，Test(1,2)，Test(1,3)，Test(

4、2,0)，Test(2,1)，Test(2,2)，Test(2,3)，其形式如圖8-1所示。圖8-1 二維數(shù)組 在一般情況下，數(shù)組下標(biāo)的下界默認(rèn)為0。如果希望下標(biāo)從1開始，也可以通過(guò)Option Base語(yǔ)句來(lái)設(shè)置，其格式為： Option Base n 其中n的值只能是0或1。Option Base語(yǔ)句只能出現(xiàn)在窗體層或模塊層，不能出現(xiàn)在過(guò)程中，并且必須出現(xiàn)在數(shù)組定義之前。如果定義的是多維數(shù)組，則下標(biāo)的默認(rèn)下界對(duì)每一維都有效。2根據(jù)需要指定數(shù)組下標(biāo)的下界。格式如下： Dim 數(shù)組名（下界 To 上界，下界 To 上界，） As 類型名稱 如： Dim Arr(-2 To 3) As Inte

5、ger 定義了一個(gè)一維數(shù)組Arr，其下標(biāo)的下界為-2，上界為3，因此該數(shù)組共有：Arr(-2)，Arr(-1)，Arr(0)，Arr(1)，Arr(2)，Arr(3)六個(gè)數(shù)組元素。說(shuō)明： 數(shù)組名的命名規(guī)則與變量名相同。但在同一個(gè)過(guò)程中，數(shù)組名不能與變量名同名。 數(shù)組必須先定義，后使用。BASIC的早期版本支持?jǐn)?shù)組的隱式定義，即如果一個(gè)數(shù)組未經(jīng)定義而直接使用，則該數(shù)組的各維的默認(rèn)上界為10，下界為0或1。但在VB中，不允許使用隱式定義。 當(dāng)用Dim語(yǔ)句定義數(shù)組時(shí)，數(shù)組中的全部元素都被初始化為0（數(shù)值型數(shù)組）或空字符串（字符型數(shù)組）。 在第一種格式中，下標(biāo)的下界只能是0或1，而在第二種格式中，下標(biāo)

6、的范圍可以是-3276832767。注意區(qū)分“可以使用的最大下標(biāo)值”和“元素個(gè)數(shù)”：前者指的是下標(biāo)值的上界，后者指數(shù)組中元素個(gè)數(shù)。如： Dim Arr(3 To 5) As Integer 在數(shù)組Arr中，元素個(gè)數(shù)為3，而可以使用的最大下標(biāo)值為5。在定義數(shù)組時(shí)，每一維的元素個(gè)數(shù)必須是常數(shù)，不能是變量或表達(dá)式。如： Dim A(n) As Integer 是不合法的。 如果需要在運(yùn)行時(shí)定義數(shù)組的大小，可以用動(dòng)態(tài)數(shù)組的方法來(lái)解決這將在8.2節(jié)中詳細(xì)講解。數(shù)組的類型通常用As給出，如果省略As，則定義的是默認(rèn)數(shù)組。 數(shù)組的下界都必須小于上界。VB中提供了兩個(gè)函數(shù)LBound和UBound來(lái)測(cè)試一個(gè)數(shù)

7、組中指定維的下界值和上界值，這兩個(gè)函數(shù)的格式為： LBound(數(shù)組名,維) UBound(數(shù)組名,維) 如果測(cè)試的是一維數(shù)組，則參數(shù)“維”可以省略，如果測(cè)試的是多維數(shù)組，則參數(shù)“維”不能省略。如有下面的定義： Dim A(1 to 30,0 to 50,-2 to 20) 則用下面的語(yǔ)句可以得到該數(shù)組各維的上下界： Print LBound(A,1),UBound(A,1) Print LBound(A,2),UBound(A,2) Print LBound(A,3),UBound(A,3) 輸出結(jié)果為： 130 050 -2208.1.3 默認(rèn)數(shù)組 所謂默認(rèn)數(shù)組，就是數(shù)組類型為Varian

8、t（默認(rèn)）的數(shù)組。VB中允許定義默認(rèn)數(shù)組。一般情況下，定義數(shù)組時(shí)應(yīng)指明其類型。如：Static Arr(3 to 5) As Integer 定義了一個(gè)數(shù)組Arr，該數(shù)組有3個(gè)元素，每個(gè)元素都是一個(gè)整型數(shù)據(jù)。 如果把上述定義改為： Static Arr(3 to 5) 則數(shù)組Arr是一個(gè)默認(rèn)數(shù)組，其類型為Variant。即等價(jià)于如下定義：Static Arr(3 to 5) AsVariant 那么，默認(rèn)數(shù)組有什么作用呢？前面我們已經(jīng)知道：幾乎在所有的程序設(shè)計(jì)語(yǔ)言中，一個(gè)數(shù)組中的所有元素必須屬于同一種數(shù)據(jù)類型，而在VB中，一個(gè)數(shù)組中的元素可以是相同類型的數(shù)據(jù)，也可以是不同數(shù)據(jù)類型的數(shù)據(jù)。而默認(rèn)

9、數(shù)組就是可以存放不同類型數(shù)據(jù)的數(shù)組。因此，默認(rèn)數(shù)組也可以說(shuō)是一種“混合數(shù)組”。 如：Static Arr(1 to 5)Arr(1)=10 Arr(2)=3.9 Arr(3)=”Visual Basic” Arr(4)=”20”& Now Arr(5)=&HAAF 定義了一個(gè)靜態(tài)默認(rèn)數(shù)組Arr（默認(rèn)數(shù)組一般定義為靜態(tài)的），共有5個(gè)元素，在接下來(lái)的賦值中我們看到，對(duì)這5個(gè)元素分別賦予了整型、實(shí)型、字符串型、日期和時(shí)間型及十六進(jìn)制整型。8.2 靜態(tài)數(shù)組與動(dòng)態(tài)數(shù)組 在定義時(shí)已確定了數(shù)組占用內(nèi)存空間大小的數(shù)組稱為靜態(tài)數(shù)組，前面我們所使用的數(shù)組都是靜態(tài)數(shù)組。動(dòng)態(tài)數(shù)組是指在聲明數(shù)組時(shí)未給出數(shù)組占用內(nèi)存的大

10、?。ㄊ÷岳ㄌ?hào)中的下標(biāo)），當(dāng)要使用它時(shí)，隨時(shí)用ReDim語(yǔ)句重新指出數(shù)組數(shù)組的下標(biāo)，從新為其開辟內(nèi)存區(qū)的數(shù)組。 因此靜態(tài)數(shù)組是在程序編譯時(shí)就為數(shù)組分配好了內(nèi)存空間的，而動(dòng)態(tài)數(shù)組是在程序執(zhí)行時(shí)執(zhí)行到ReDim語(yǔ)句時(shí)為數(shù)組分配內(nèi)存空間的。動(dòng)態(tài)數(shù)組的優(yōu)點(diǎn)是根據(jù)用戶需要，有效地利用內(nèi)存空間，因?yàn)閳?zhí)行ReDim之前，動(dòng)態(tài)數(shù)組是不占內(nèi)存空間的。 下面主要介紹動(dòng)態(tài)數(shù)組的定義。 定義動(dòng)態(tài)數(shù)組的方法是：在窗體層、標(biāo)準(zhǔn)模塊或過(guò)程中使用Dim或Public語(yǔ)句聲明一個(gè)沒(méi)有下標(biāo)（即括號(hào)內(nèi)為空，但括號(hào)不能?。┑臄?shù)組，然后在過(guò)程中用ReDim語(yǔ)句指明該數(shù)組的大小。ReDim語(yǔ)句格式如下：ReDim數(shù)組名（下標(biāo)，下標(biāo)）As類

11、型 其中：下標(biāo)可以是常量，也可以是有了確定值的變量。類型可以省略，若不省略，必須與前面聲明語(yǔ)句中的類型保持一致。如：Dim Test( ) As Single Sub Form_Load( ) ReDim Test(4,8) End Sub 在窗體層聲明了數(shù)組Test為可變長(zhǎng)數(shù)組，在Form_Load( )事件過(guò)程中指明該二維數(shù)組的大小為5行9列。再如：Public TestArr( ) As Integer Dim size As Integer Sub Form_Click( ) size=InputBox(Enter a integer value:,Data,12) ReDim Tes

12、tArr(size) End Sub 首先聲明了一個(gè)空數(shù)組TestArr和一個(gè)變量size，然后在Form_Click( )事件過(guò)程中輸入一個(gè)值給size，用ReDim語(yǔ)句定義數(shù)組TestArr的大小為size。例8-2（參看教材P132-133）8.3 數(shù)組的基本操作8.3.1 對(duì)數(shù)組元素進(jìn)行初始化8.3.2 數(shù)組元素的輸入8.3.3 數(shù)組元素的輸出8.3.4 數(shù)組的賦值8.3.5 For EachNext語(yǔ)句 定義一個(gè)數(shù)組后，可以對(duì)數(shù)組中的元素進(jìn)行初始化、輸入、輸出等操作。在VB中，還提供了For EachNext語(yǔ)句用于對(duì)數(shù)組的操作。8.3.1 對(duì)數(shù)組元素進(jìn)行初始化 早期的BASIC版本

13、中提供了READ_DATA語(yǔ)句，它為多個(gè)變量特別是數(shù)組元素的賦值提供了方便。但在Microsoft公司1991年推出VB1.0版時(shí)，去掉了READ_DATA語(yǔ)句。這樣就只能通過(guò)賦值語(yǔ)句或InputBox函數(shù)為多個(gè)變量或數(shù)組元素賦值。但當(dāng)需要賦值的變量或數(shù)組元素較多時(shí)，將大大增加程序代碼的數(shù)量。在Microsoft公司隨后推出的VB2.0和3.0版本中，這個(gè)問(wèn)題也未能解決。直到VB4.0版推出后，一個(gè)新的Array函數(shù)取代READ_DATA語(yǔ)句重新出現(xiàn)。 Array函數(shù)用來(lái)為數(shù)組元素賦值，即把一個(gè)數(shù)據(jù)集讀入某個(gè)數(shù)組。其格式為：數(shù)組變量名Array（數(shù)組元素值） 其中：數(shù)組變量名是預(yù)先定義的數(shù)組名

14、，它后面沒(méi)有括號(hào)，之所以稱為“數(shù)組變量”，是因?yàn)樗鳛閿?shù)組使用，但作為變量定義，既沒(méi)有維數(shù)，也沒(méi)有上下界，并且數(shù)組變量不能是具體的數(shù)據(jù)類型，只能是Variant類型。數(shù)組元素值是需要賦給數(shù)組各元素的值，各值之間以逗號(hào)分隔。如：Static Num As VariantNum=Array(1,2,3,4,5,6) 將把1、2、3、4、5、6這六個(gè)數(shù)值賦給數(shù)組Num的各個(gè)元素，即Num(0)=1，Num(1)=2，Num(2)=3，Num(3)=4，Num(4)=5，Num(5)=6。注意默認(rèn)數(shù)組下標(biāo)從0開始。如果想使下標(biāo)從1開始，則應(yīng)數(shù)組定義模塊的聲明部分執(zhí)行：Option Base 1 之后，

15、數(shù)組Num各元素的值分別為：Num(1)=1，Num(2)=2，Num(3)=3，Num(4)=4，Num(5)=5，Num(6)=6。數(shù)組變量可以有三種定義方式：顯式定義為Variant變量。如： Dim Num As Variant 在定義時(shí)不指明類型。如： Dim Num不定義而直接使用。例8-3（參看教材P134）8.3.2 數(shù)組元素的輸入 數(shù)組元素一般通過(guò)For循環(huán)語(yǔ)句及InputBox函數(shù)輸入。如：For i=0 To 3For j=0 To 4s(i,j)=InputBox(“輸入” & i & ”,” & j & ”的值”) 提醒用戶輸入Next jNext i8.3.3 數(shù)組

16、元素的輸出 數(shù)組元素的輸出可以用循環(huán)及Print方法來(lái)實(shí)現(xiàn)。如：For i=0 To 3For j=0 To 4Print s(i , j);” “;Next jPrintNext i8.3.4 數(shù)組的賦值 數(shù)組的賦值是指將一個(gè)數(shù)組各個(gè)元素的值賦給另一數(shù)組的各個(gè)元素。在VB6.0以前的版本中，要通過(guò)一個(gè)For循環(huán)來(lái)實(shí)現(xiàn)。在VB6.0中，只要通過(guò)一條簡(jiǎn)單的賦值語(yǔ)句即可實(shí)現(xiàn)。例如： Dim a(4) As Integer,b() As Integer a(0)=0:a(1)=5:a(2)=10:a(3)=15:a(4)=20 b=a 其中：b=a語(yǔ)句相當(dāng)于執(zhí)行了ReDim b(UBound(a)

17、For i=0 To UBound(a)b(i)=a(i) Next i在數(shù)組對(duì)數(shù)組賦值時(shí)要注意：賦值號(hào)兩邊的數(shù)組的數(shù)據(jù)類型必須一致。如果賦值號(hào)左邊是一個(gè)動(dòng)態(tài)數(shù)組，則賦值時(shí)系統(tǒng)自動(dòng)將動(dòng)態(tài)數(shù)組RdDim成與右邊同樣大小的數(shù)組。如果賦值號(hào)左邊是一個(gè)大小固定的靜態(tài)數(shù)組，則數(shù)組賦值出錯(cuò)。8.3.5 For EachNext語(yǔ)句 For EachNext語(yǔ)句與ForNext語(yǔ)句類似，都用來(lái)執(zhí)行指定次數(shù)的重復(fù)操作。但For EachNext語(yǔ)句專門用于數(shù)組，其一般格式為： For Each成員In 數(shù)組名 循環(huán)體 Exit For Next 成員 其中：成員是一個(gè)變體變量，它是為循環(huán)提供的，它實(shí)際上代表的

18、是數(shù)組中的每個(gè)元素。 用For EachNext語(yǔ)句可以對(duì)數(shù)組中的元素進(jìn)行顯示、讀取等處理，它所重復(fù)執(zhí)行的次數(shù)由數(shù)組中元素的個(gè)數(shù)確定，也就是說(shuō)，數(shù)組中有多少個(gè)元素，就自動(dòng)重復(fù)執(zhí)行多少次。如： Dim Array(1 to 5) For Each x in Array Print x; Next x 將重復(fù)執(zhí)行5次，依次輸出數(shù)組中每個(gè)元素的值。這里的x類似于ForNext語(yǔ)句中的循環(huán)變量，但不需要為其提供初值和終值，而是根據(jù)數(shù)組元素的個(gè)數(shù)確定重復(fù)執(zhí)行的次數(shù)。并且x的值處于不斷的變化之中，開始執(zhí)行時(shí)，x是數(shù)組中第一個(gè)元素的值，執(zhí)行完一次循環(huán)后，x變?yōu)閿?shù)組第二個(gè)元素的值，當(dāng)x為最后一個(gè)元素的值時(shí)，執(zhí)

19、行最后一次循環(huán)。也就是說(shuō)，x是一個(gè)變體變量，它可以代表任何類型的數(shù)組元素。 不難看出，在數(shù)組操作中，F(xiàn)or EachNext語(yǔ)句比ForNext語(yǔ)句更方便。但需要注意的是：不能在For EachNext語(yǔ)句中使用用戶自定義類型數(shù)組，因?yàn)閂ariant不能包含用戶自定義類型。8.4 數(shù)組的應(yīng)用舉例例8-4（參看教材P136-137）例8-5（參看教材P137-138）8.5 控件數(shù)組8.5.1控件數(shù)組的作用8.5.2 控件數(shù)組的建立 控件數(shù)組是由一組相同類型的控件組成。它們共用一個(gè)控件名，具有相同的屬性。當(dāng)建立控件數(shù)組時(shí)，系統(tǒng)給每個(gè)元素賦一個(gè)唯一的索引號(hào)（Index），即下標(biāo)，通過(guò)屬性窗口的In

20、dex屬性，可以知道該控件的下標(biāo)是多少，第一個(gè)下標(biāo)是0。8.5.1控件數(shù)組的作用 控件數(shù)組適用于若干個(gè)控件執(zhí)行的操作相似的場(chǎng)合，控件數(shù)組共享同樣的事件過(guò)程。例如有一個(gè)控件數(shù)組cmdName有3個(gè)命令按鈕，則不管單擊哪一個(gè)命令按鈕，都會(huì)調(diào)用同一個(gè)單擊（Click）事件過(guò)程。 控件數(shù)組的名字由Name屬性指定，而數(shù)組中的每個(gè)元素則由其Index屬性指定。和普通數(shù)組一樣，控件數(shù)組的下標(biāo)也放在小括號(hào)內(nèi)，如cmdName(2)，表示控件數(shù)組cmdName中下標(biāo)值為2的元素。 為了區(qū)分控件數(shù)組中的各個(gè)元素，VB會(huì)把下標(biāo)值傳送給一個(gè)過(guò)程。例如，單擊上述控件數(shù)組cmdName中的任意一個(gè)命令按鈕時(shí)，調(diào)用的事件

21、過(guò)程如下： Private Sub cmdName_Click( Index As Integer)If Index=2 ThencmdName( Index ).Caption=”第3個(gè)命令按鈕”End If End Sub 則當(dāng)單擊cmdName(2)命令按鈕時(shí)，該按鈕顯示“第3個(gè)命令按鈕”。8.5.2 控件數(shù)組的建立 控件數(shù)組是針對(duì)控件建立的，因此與普通數(shù)組的定義不一樣?？丶?shù)組的建立有兩種方法： 第一種方法是在設(shè)計(jì)時(shí)建立，建立的步驟如下： 在窗體中畫出作為數(shù)組元素的某個(gè)控件，可設(shè)置該控件名的屬性，這是建立的第一個(gè)元素。 選中該控件，進(jìn)行“復(fù)制”（Copy）和“粘貼”（Paste）操作，

22、系統(tǒng)會(huì)顯示一個(gè)對(duì)話框，詢問(wèn)是否要建立控件數(shù)組，單擊“是”后，窗體的左上角將出現(xiàn)一個(gè)控件，它就是控件數(shù)組的第二個(gè)元素，可將其拖放到窗體中適當(dāng)位置。 重復(fù)執(zhí)行“粘貼”（Paste）操作，繼續(xù)建立控件數(shù)組中其它元素。 控件數(shù)組建立后，只要改變一個(gè)控件的“Name”屬性值，并把其“Index”屬性值置為空（注意不是0），就能把該控件從控件數(shù)組中刪除。例8-6（參看教材P139-140)例8-7 （參看教材P140-142)3.1.1 JSP、Java與Javascript 1聲明 JSP聲明的作用是說(shuō)明將要使用的變量和方法，以保存信息或定義JSP頁(yè)面可能需要調(diào)用的方法，其作為范圍是整個(gè)頁(yè)面。 因?yàn)镴S

23、P是基于Java技術(shù)的，因此要求像Java一樣，對(duì)于將要在JSP程序中用到的變量和方法，必須先進(jìn)行聲明，不然將會(huì)出錯(cuò)。在聲明元素中聲明的變量和方法，將在JSP頁(yè)面初始化時(shí)進(jìn)行初始化。2表達(dá)式 表達(dá)式用于將JSP內(nèi)容轉(zhuǎn)換為字符串以便于包含在頁(yè)面的輸出中。表達(dá)式表示的是一個(gè)在腳本語(yǔ)言中被定義的表達(dá)式，在運(yùn)行后被自動(dòng)轉(zhuǎn)化為字符串，然后插入到這個(gè)表達(dá)式在JSP文件中的位置顯示。因?yàn)楸磉_(dá)式的值已經(jīng)被轉(zhuǎn)化為字符串，所以能夠在一行文本中插入表達(dá)式。 表達(dá)式的使用格式如下： 其中，expression部分是表達(dá)式的內(nèi)容，它是一個(gè)有計(jì)算結(jié)果的JSP表達(dá)式（注意，表達(dá)式一定要有一個(gè)可以輸出的值），如數(shù)學(xué)計(jì)算式子、

24、有返回值的函數(shù)、變量等。3腳本片段 腳本片段（Scriptlets）也稱為代碼片段，它是一個(gè)有效的Java程序段，是JSP中的代碼部分。在這個(gè)部分中可以使用幾乎任何Java的語(yǔ)法來(lái)編制程序，它是嵌放在標(biāo)記中的，語(yǔ)法格式如下：4注釋 注釋是程序設(shè)計(jì)中的常用工具，注釋通常有兩方面的作用：一個(gè)作用是作為提示，讓人可以從注釋信息中了解某段程序的功能或設(shè)計(jì)思想，在閱讀/編寫程序時(shí)提供參考信息；另一個(gè)作用是將未完成的或有錯(cuò)誤的某個(gè)程序塊通過(guò)改為注釋而隱藏起來(lái)，使其暫時(shí)不參與程序的執(zhí)行，這種方式也適用于程序調(diào)試，即將調(diào)試時(shí)編寫的調(diào)試語(yǔ)句作為注釋隱藏起來(lái)。 JSP中的注釋可以分為兩類：一類是輸出到客戶端，用戶在查看源文件時(shí)可以看見(jiàn)，另一類是僅在服務(wù)器端，供開發(fā)者使用的，這種注釋僅服務(wù)器端可見(jiàn)，不會(huì)發(fā)送到客戶端。（1）輸出到瀏覽器端的注釋（2）服務(wù)器端的JSP注釋 3.1.2 JSP的數(shù)據(jù)類型1變量 變量是指在程序運(yùn)行過(guò)程中，值可以發(fā)生變化的量。與Java一樣，JSP中的變量也遵循“先定義，后使用”的原則，變量在使用前，都要求先進(jìn)行定義其數(shù)據(jù)類型。 在定義時(shí)系統(tǒng)會(huì)為變量分配固定的內(nèi)存，在程序執(zhí)行中可以按照變量名對(duì)其中的內(nèi)