请问我该如何在VB中使用load )函数加载label？有什么办法吗

Question

如何在VB中使用load )函数加载label

Answer 1

首先要在窗体上添加一个label控件，将其的index属性设置为0（创建控件数组），然后代码如下：
Private Sub Command1_Click()
Dim i As Integer
For i = 2 To 5
Load Label1(i)
Label1(i).Caption = "Label1" & i
Label1(i).Visible = True
Label1(i).Top = i * 500
Next i
End Sub