《VB語言程序設(shè)計(第2版)》是2009年電子工業(yè)出版社出版的圖書，作者是林卓然。本書主要介紹可視化程序設(shè)計的基本知識和編程方法。

本書以visual basic 6.0為語言背景，以程序結(jié)構(gòu)為主線，介紹可視化程序設(shè)計的基本知識和編程方法。內(nèi)容包括：認識visual basic，程序設(shè)計基礎(chǔ)，順序結(jié)構(gòu)程序設(shè)計，選擇結(jié)構(gòu)程序設(shè)計，循環(huán)結(jié)構(gòu)程序設(shè)計，數(shù)組，過程，程序調(diào)試與錯誤處理，數(shù)據(jù)文件與文件管理，菜單及對話框，繪圖及其他常用控件等。本書概念清晰，層次分明，敘述簡明易懂，注重實用性和可操作性。各章配有精心設(shè)計的習(xí)題和編程及上機調(diào)試題。本書為任課教師免費提供電子教案及習(xí)題參考答案。本書適合作為高等學(xué)校計算機程序設(shè)計教材，也可作為各類vb培訓(xùn)班及全國計算機等級考試讀者的學(xué)習(xí)參考書。

控件數(shù)組是Visual Basic中的一個名詞，它是一組具有相同名稱和類型的控件的集合，通過各自的編號(下標)來識別，并且可以共享事件。

在設(shè)計時，有三種辦法創(chuàng)建控件數(shù)組：更改控件的Index屬性、將已有的控件復(fù)制到同一窗體中、使多個同類型的控件的名稱(Name屬性)相同。更改Index屬性選擇一個控件，按F4打開“屬性”面板，找到“Index”屬性，將其更改為一個0和32767之間(包括0和32767)的且未被用于其他控件索引值的整數(shù)，即可創(chuàng)建一個以原控件名稱為名稱的控件數(shù)組。復(fù)制已有控件若已有一控件名為Command，右擊該控件，單擊快捷菜單中的“復(fù)制”，再右擊控件所在窗體(或其中的一個類似Frame的容器控件)，單擊快捷菜單中的“粘貼”，VB會彈出一個對話框，顯示“已經(jīng)有一個控件為 'Command'。創(chuàng)建一個控件數(shù)組嗎?”單擊“是”按鈕，就可創(chuàng)建一個名稱(Name屬性)為“Command”的控件數(shù)組，被復(fù)制的控件為Command(0)，粘貼的控件為Command(1)。使控件名相同若已有一控件名為Command，將另一同類型控件的Name屬性改為“Command”后，VB也會彈出一個對話框，單擊“是”即可創(chuàng)建一控件數(shù)組。運行時增減對象添加對象在VB中，不能在運行時直接創(chuàng)建一個原先不存在的控件數(shù)組，但可以使用Load函數(shù)為已存在的控件數(shù)組添加同類型的控件。假設(shè)已有一個控件數(shù)組名為“Command”，數(shù)組中只有一個對象“Command(0)”，在運行時，可以通過下面的代碼增加一個對象“Command(1)”。PrivateSubCommand_Click(IndexAsInteger)'控件數(shù)組中控件的點擊事件LoadCommand(1)'添加Command(1)Command(1).Top=0'將Command(1)移至頂端Command(1).Visible=True'將Command(1)設(shè)置為可見EndSub說明：此處的Load函數(shù)的語法如下：Load Object (Index As Integer)Load函數(shù)參數(shù)參數(shù)描述Object必選，對象表達式，要添加控件的控件數(shù)組名稱。Index必選，數(shù)值表達式，0～32767的一個整數(shù)，被添加的控件在控件數(shù)組中的索引值(Index屬性)，該值必須未被引用。運行時在一個控件數(shù)組中添加了新的控件后，新控件除Index、TabIndex和Visible屬性外，其余屬性與該控件數(shù)組中Index屬性最小的控件的相應(yīng)屬性完全相同。而Index屬性在Load函數(shù)中指定，TabIndex屬性取VB規(guī)定的默認數(shù)值(比其他任何控件都大)，Visible為False。所以需要改變新控件的Left或Top，以及Visible屬性后才能看到它。這里的代碼僅設(shè)計用于添加Command(1)，即使Command中的按鈕被點擊兩次，也不能添加Command(2)，而是會返回“對象已經(jīng)加載”的錯誤。為了不斷添加控件，可以使用下面的代碼。PrivateSubCommand_Click(IndexAsInteger)'控件數(shù)組中控件的點擊事件IfCommand.UBound=32767ThenExitSubLoadCommand(Command.UBound+1)'添加控件Command(Command.UBound).Top=Command.UBound*150'移動新控件Command(Command.UBound).Visible=True'將新控件設(shè)置為可見EndSub控件數(shù)組的UBound屬性返回該控件數(shù)組中控件的最大下標(索引值)，添加索引值為Command.UBound+1(不大于32767)的控件數(shù)組元素可以保證不發(fā)生“對象已經(jīng)加載”的錯誤。但是，由于控件數(shù)組中每個控件的索引值并不一定是連續(xù)的，即可以只添加Command(1)和Command(3)而不添加Command(2)，所以即使控件數(shù)組最大索引值為32767，該控件數(shù)組也不一定有32767個對象。刪除對象運行時可以使用Unload函數(shù)刪除控件數(shù)組中運行時創(chuàng)建的控件，但設(shè)計時創(chuàng)建的控件不能刪除。如：UnloadCommand(1)Unload函數(shù)語法與Load函數(shù)語法相似。屬性概述每個控件數(shù)組本身都有4個屬性，這4個屬性都是設(shè)計時無效、運行時只讀的;而一個單獨的控件還有和控件數(shù)組相關(guān)的Index屬性。Count屬性O(shè)bject.Count As Long返回控件數(shù)組中的元素個數(shù)。Item屬性O(shè)bject.Item (IndexAs Integer) As Object返回控件數(shù)組中指定下標的控件，相當(dāng)于Object(IndexAs Integer) As Object。

LBound和UBound屬性O(shè)bject.LBound As IntegerObject.UBound As Integer返回控件數(shù)組中下標的最小值(LBound)或最大值(UBound)。

Index屬性O(shè)bject.Index As Integer(0≤Object.Index≤32767)這個屬性應(yīng)用于控件數(shù)組中的一個控件，作用是返回或設(shè)計時設(shè)置控件在其控件數(shù)組中的下標，僅當(dāng)Object屬于某一控件數(shù)組時有效。