【正文】 與該窗體模塊相關(guān)聯(lián)的代碼還保持在內(nèi)存中。 （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC （三）窗體的隱藏與卸載 （ 1） Unload語句：從內(nèi)存刪除窗體 Unload 窗體名稱 說明： 當(dāng)窗體卸載之后，所有在運行時放到該窗體上的控件都不再是可訪問的。 注意：這里的窗體名稱是窗體的 Name屬性，而不是窗體的文件名，以下相同。 如果設(shè)置從主過程 Main()啟動，則必須在標(biāo)準(zhǔn)模塊中編寫 Main()過程代碼。 一個程序的啟動對象可以是： ① 一個窗體 （缺省情況下為第一個創(chuàng)建的窗體） ②標(biāo)準(zhǔn)模塊中名為 Main的自定義 Sub過程 。 Spc(3)。 例： Dim a(15) Print UBound(a) Print LBound(a) 15 0 （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC 例：打印輸出楊輝三角 Dim a(1 To 5, 1 To 5) As Integer For i = 1 To 5 a(i, i) = 1: a(i, 1) = 1 Next i For i = 3 To 5 For j = 2 To i1 a(i, j) = a(i 1, j 1) + a(i 1, j) Next j Next i 1 0 0 0 0 1 1 0 0 0 1 2 1 0 0 1 3 3 1 0 1 4 6 4 1 For i = 1 To 5 Next i Print Tab(20 3 * i)。 1 表示第一維，2 表示第二維，如此等等。 ? dimension 可選的； Variant (Long)。 使用形式： UBound(arrayname[, dimension]) LBound(arrayname[, dimension]) （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC ? arrayname 必需的。 a(i) Next i （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC 大量數(shù)據(jù)的輸入 (1)、使用循環(huán)用 inputBox()函數(shù)輸入 dim j%, a(20) as single for j=0 to 20 a(j)=Val(InputBox(輸入數(shù)組元素 )) next j (2) 、用 VB系統(tǒng)函數(shù) Array()給數(shù)組初始值 Dim A() As Integer A = Array(10,20,30) 如果不提供參數(shù)，則創(chuàng)建一個長度為 0 的數(shù)組。 i amp。 （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC 2. 統(tǒng) 計 : 用隨機函數(shù)產(chǎn)生 100個 [0， 99]范圍內(nèi)的隨機整數(shù)，統(tǒng)計個位上的數(shù)字分別為 1， 2， 3， 4，5， 6， 7， 8， 9， 0的數(shù)的個數(shù)并打印出來。 Max 。 要求：打印該數(shù)列的 30個數(shù) Dim a%(30) f(1) = 1: f(2) = 1 For i = 3 To 30 f(i) = f(i 1) + f(i 2) Next For i = 1 To 30 Print f(i)。 f2。但此時 只能改變最后一維的大小。 格式： ReDim [Preserve] 數(shù)組名 （ 下標(biāo) 1[， 下標(biāo) 2… ]） ） 例： ReDim a(20) 或 ReDim a(20) Preserve參數(shù)：保留數(shù)組中原來的數(shù)據(jù) （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC 說明： 1）區(qū)分定長、變長數(shù)組 Dim N As Integer N=Val(InputBox(“ N=” )) Dim x(n) As Single 定長數(shù)組聲明中下標(biāo)不能是變量 Dim N As Integer Dim x() As Single N=Val(InputBox(“ N=” )) ReDim x(N) 2）在過程中可以多次使用 ReDim來改變數(shù)組的大小，也可 改變數(shù)組的維數(shù)。定長數(shù)組是在程序編譯時分配存儲空間，而動態(tài)數(shù)組是在程序執(zhí)行時分配存儲空間。 （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC （一） 定長數(shù)組及聲明 Dim | Private|Public 數(shù)組名 (下標(biāo) 1[,下標(biāo) 2…]) [As 類型 ] 維數(shù)： 數(shù)組下標(biāo)變量的個數(shù)，用 “ ， ” 分隔 下標(biāo)： [下界 To]上界 注： 必須為常數(shù)，若省略下界為 0 （默認值可由語句 Option Base 1改變） 每一維大小： 上界－下界 +1 數(shù)組大?。偟脑獢?shù)個數(shù)）： 每一維大小的乘積 例 : Dim mark(1 to 100) As Integer Dim mark%(100)Dim mark%(0 to 100) Dim a(1 to 3, 1 to4) As Integer Dim s(2,5) As Single （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC 數(shù)組在內(nèi)存中占據(jù)一片連續(xù)的存儲空間： 如 : Dim a(1 to 8) As Integer a(1) a(2) a(3) a(4) a(5) a(6) a(7) a(8) 如 : Dim a(2,3) As Integer 共 3*4個元素 a(0,0) a(0,1) a(0,2) a(0,3) a(1,0) a(1,1) a(1,2) a(1,3) a(2,0) a(2,1) a(2,2) a(2,3) 二維數(shù)組在內(nèi)存的存放順序是 “ 先行后列 ” 。 ?數(shù)列的使用 比如全校學(xué)生的成績排名，排序并取其中一定名次的同學(xué)。 （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC 數(shù)組作用 ? 減少變量的聲名 比如有一百個同類型變量，需要聲明 100次。數(shù)組中的每一個元素都可以通過一個數(shù)值下標(biāo)訪問。” ， ” 。” ， ” 。 聲明形式： Static 變量名 [AS 類型 ] Static Function 函數(shù)過程名 ([參數(shù)列表 ]) [As 類型 ] Static Sub 子過程名 [(參數(shù)列表 )] 注意：過程名前加 Static，表示該過程內(nèi)的局部變量都是靜態(tài)變量 。 加窗體名 Print , Temp End Sub （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC 若在不同級聲明相同的變量名 ,系統(tǒng)按 局部 → 窗體 /模塊 → 全局 次序訪問 Private a As Integer Private Sub Command1_Click() Dim a As Integer a = a + 1 Print a End Sub Private Sub Command2_Click() a = a + 1 Print a End Sub （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC （三） 靜態(tài)變量 局部變量聲明： Dim聲明： 隨過程的調(diào)用而分配存貯單元，變量的初始化；過程體結(jié)束，變量的內(nèi)容自動消失，存貯單元釋放。 訪問局部變量 =20 39。 全局變量 Sub Form_click（） Dim Temp As Integer 39。 ） 。 全局級： 加 Public 關(guān)鍵字 （或缺?。?的過程，可供該應(yīng)用程序的所有窗體和所有標(biāo)準(zhǔn)模塊中的過程調(diào)用。它隨所處的位置不同而不同。 B。 B。 傳值： 形參得到的是實參的值，形參值的改變不會影響實參的值。 （ P99） 程序舉例說明 （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC （四）參數(shù)傳遞 指主調(diào)過程的實參傳遞給被調(diào)過程的形參。 –自定義過程： 普通的過程名稱，如： Private sub abc() –事件過程： Private sub Command1_click Private sub Form1_click Private sub Form1_Load （二） VB程序設(shè)計基礎(chǔ) 授課教師：葉夏 計算機應(yīng)用基礎(chǔ)及 VBASIC （三） 過程的調(diào)用 1 子過程的調(diào)用： 子過程名 [參數(shù)