要创建一个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等属性,我们可以定位和设置这些文本框控件的显示样式。