VB6.0控件數組索引號是在空間的屬性窗口的Index 屬性處設置。
Index 屬性（控件數組），返回或設置唯壹地標識控件數組中壹個控件的編號。僅當控件是控件數組的元素時是有效的。
雖然缺省狀態下 Visual Basic 分配下壹個可用的整數作為控件數組中新的控件的 Index 的值，但也可以改變該分配值並跳過壹些數。也可以為數組中的第壹個控件的
Index 設壹個非 0 的整數。如果在代碼中引用壹個 Index 的值而在控件數組中沒有所標識的控件，那麽將產生壹個Visual Basic 運行時錯誤。
Index 屬性區分控件數組中的元素。當數組中的壹個控件識別了壹個事件時，Visual Basic將調用公***事件過程並傳遞壹個參數（Index 屬性的值），分辨是哪個控件識別事件。
例如，Number_Click 事件過程的第壹行代碼是這樣的：
Private Sub Number_Click (Index As Integer)
如果 Number(0) 識別事件，則 Visual Basic 將 0 作為 index 參數傳遞，而如果 Number(1) 識別事件，則 Visual Basic 將 1 作為 index 參數傳遞。
Index 屬性示例
該例子開始時有兩個 OptionButton 控件，並在每次單擊 CommandButton 控件時在窗體中加入壹個新的OptionButton。當單擊壹個 OptionButton 時，FillStyle
屬性被設置並且畫壹個新的圓。要試用此例，將下面的代碼粘貼到具有兩個 OptionButton 控件、壹個 CommandButton、以及壹個大的 PictureBox
控件的窗體的聲明部分之中。將兩個 OptionButton 控件的 Name 屬性都設置為 Option1
以創建壹個控件數組。
Private Sub Option1_Click(Index As Integer)
Dim H, W ? '聲明變量。
Picture1.Cls ? '清除圖片。
Picture1.FillStyle = Index ? '設置 FillStyle。
W = Picture1.ScaleWidth / 2 ? '獲取圓的大小。
H = Picture1.ScaleHeight / 2
Picture1.Circle (W, H), W / 2 ? '畫圓。
End Sub
Private Sub Command1_Click()
Static MaxIdx ? '數組中的最大索引值。
If MaxIdx = 0 Then MaxIdx = 1 ? '預置 MaxIdx。
MaxIdx = MaxIdx + 1 ? '索引值增加 1 。
If MaxIdx > 7 Then Exit Sub ? '在窗體中放置八個按鈕。
Load Option1(MaxIdx) ? '在數組中創建新的項。
'在前壹個按鈕下面設置新選項按鈕的位置。
Option1(MaxIdx).Top = Option1(MaxIdx - 1).Top + 360
Option1(MaxIdx).Visible = True ? '使新的按鈕可見。
End Sub