Dynamic Control Matrix

[carlosweiss]

Hi,

I want to add a matrix of controls at runtime. If I write:

Set ctrls(i) = Me.Controls.Add("VB.Label", myCtrl(i))

I get an error. Any ideas on this? should I declare it first? how?

Thanks,

Carlos

 

[johnwm]

Easy way is to put one label on the form at design time and set its Index property to 0. Then use the Load statement for the subsequent labels in the matrix, calculating their positions from the Index value:

For e = 1 To n - 1
  Load Label1(e)
   With Me.Label1(e)
   .Visible = True
   .Top = 300 + 400 * e
  End With
Next e

________________________________________________________________
If you want to get the best response to a question, please check out FAQ222-2244 first.
'If we're supposed to work in Hex, why have we only got A fingers?'
Drive a Steam Roller