assign objects into array or object variable?

[Fendic]

Hi

Does anyone know how to assign objects, e.g. Label, TextBox and etc
into an array?

I can't even assign a label into an object variable. Can anyone hel
please? Thank you.

All the best,
Fendi

 

[Bob Phillips]

This works for me

Dim ary
Dim ctl
ReDim ary(1 To 1)
For Each ctl In Me.Controls
If TypeName(ctl) = "TextBox" Then
If UBound(ary) <> 1 Then
ReDim Preserve ary(1 To UBound(ary) + 1)
ary(UBound(ary)) = ctl
End If
End If
Next ctl


--

HTH

RP
(remove nothere from the email address if mailing direct)