要創建一個vb控件數組,首先需要聲明一個控件數組變量,然后在代碼中使用ReDim語句來定義數組的大小。以下是一個示例:
Dim myArray() As Control
Private Sub Form_Load()
Dim i As Integer
ReDim myArray(0 To 4) ' 定義數組大小為0到4
For i = 0 To 4
Set myArray(i) = Me.Controls.Add("VB.TextBox", "TextBox" & i) ' 創建文本框控件并添加到數組中
With myArray(i)
.Left = 100
.Top = 100 + i * 30
.Width = 100
.Visible = True
End With
Next i
End Sub
在這個例子中,我們聲明了一個名為myArray的控件數組變量,并在Form_Load事件中使用ReDim語句定義了數組的大小為0到4。然后通過循環創建了5個文本框控件,并將它們添加到myArray數組中。通過設置每個文本框的Left、Top、Width等屬性,我們可以定位和設置這些文本框控件的顯示樣式。