第8章數(shù)組的使用(參考版)
2024-10-02 15:42本頁(yè)面
【正文】 s = 0 For Each x In arr ： s = s + x Next x Print s End Sub 。 在窗體中添加一個(gè)命令按鈕，書寫如下代碼： Dim arr(20) AS Integer ‘定義窗體級(jí)的全局?jǐn)?shù)組變量 Private Sub Form_Load() ‘窗體在加載的時(shí)候初始化數(shù)組。 Private Sub Form_Load() f(0).Visible = True f(0).Caption = 北方工業(yè)大學(xué) For i = 1 To 4 Load f(i) f(i).Visible = True f(i).Caption = 張露 amp。 菜單數(shù)組 可以在菜單編輯器中設(shè)定一個(gè)菜單，標(biāo)題（ Caption）不寫任何內(nèi)容，只寫它的名稱（ Name），將它的索引（ Index）設(shè)為 0，并且設(shè)置為不可見（ Visible = False）。 IsArray函數(shù) IsArray函數(shù)是用來判斷一個(gè)變量是否屬于數(shù)組， Erase語(yǔ)句 Erase函數(shù)是將某個(gè)數(shù)組所占的內(nèi)存空間釋放，歸還給系統(tǒng)。這樣就可以減少程序員編寫代碼的任務(wù)。 在點(diǎn)擊了“是”按鈕后，在窗體中就會(huì)創(chuàng)建一個(gè)控件數(shù)組，下面的例子中就是創(chuàng)建一個(gè)計(jì)算器中數(shù)字鍵和運(yùn)算符號(hào)鍵的控件數(shù)組。 控件數(shù)組的建立 創(chuàng)建控件數(shù)組可以在設(shè)計(jì)中創(chuàng)建，在設(shè)計(jì)中，可以通過以下方法來創(chuàng)建一個(gè)控件數(shù)組： 在窗體上創(chuàng)建一個(gè)控件，對(duì)控件名稱和一些屬性進(jìn)行設(shè)置，選中該控件用鼠標(biāo)進(jìn)行復(fù)制（ Copy）和粘貼（ Paste）。 Chr(13) amp。 b(i, j) amp。 Chr(13) amp。 a(i, j) amp。 j amp。 i amp。例如定義一個(gè)二維數(shù)組如下 : Dim myarray(1 To 3， 1 To 2) AS Integer 則這個(gè)數(shù)組共有（ 31+1） *（ 21+1） =6個(gè)元素，這六個(gè)元素分別是： myarray（ 1， 1）， myarray（ 1， 2） myarray（ 2， 1）， myarray（ 2， 2） myarray（ 3， 1）， myarray（ 3， 2） 而且這些變量都是整型類型。它的定義方法如下所示： Dim 數(shù)組名（下標(biāo) 1，下標(biāo) 2） [AS 類型 ] 對(duì)于其中的每一個(gè)下標(biāo)，都可以采用下界 To 上界的格式來定義，從而使得數(shù)組的存放符合人們的習(xí)慣。語(yǔ)句的形式如下： Dim sa（） [AS 類型 ] …… ReDim sa（下標(biāo) 1[，下標(biāo) 2，下標(biāo) 3……] ） [AS 類型 ] 其中：下標(biāo) I可以是常量，也可以是有了確定值的變量。使用動(dòng)態(tài)數(shù)組的優(yōu)點(diǎn)在于用戶可以根據(jù)自己的需要來有效地利用存儲(chǔ)空間，在程序執(zhí)行到 ReDim語(yǔ)句時(shí)分配存儲(chǔ)空間，而靜態(tài)數(shù)組是在程序編譯時(shí)就
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1