Visual Basic Forum for Visual Basic Programmers VB

[mt_reilly]

I am trying to create Labels with Code, rather than using the tool bar and drawing them with a mouse. I've tried the code below, but this resulted in a run-time error 91. Any suggestions on how to do this?

Private Sub Form_Load()

Dim lbl() As label
ReDim lbl(3)
For i = 1 To 3
With lbl(i)
.Height = 30
.Width = 30
.Caption = i
.Left = 300 * i
End With
Next i

End Sub

[Avis]

Hi!

Here you go with the code...its a bit modified and creates only 3 controls for now but i think you can modify according to your needs.

[P.T.A.M.]

You can't make a control array the way Avis pointed out. The index property isn't set and you can't set it at runtime. If you want a control array you have to set it at design time.
_________________
No one is completely useless. They can at least be an example of what to avoid.