Is there a way to

I need to To set some property values to about a hundred plus textboxs the problem is the text boxes arn't a simple case of numbered 1 to 100 as they are on differnt forms and there are arrays of text boxes as well Is there a way to send my property values to all of them at one oposed to text1.font= you get the point or is there a way to find out what textboxes are on my forms

thanks in advance
i need to set the font,font size,itallics,bold
so you get the point alot of dull work
spooke2k

I need to To set some property values to about a hundred plus textboxs the problem is the text boxes arn't a simple case of numbered 1 to 100 as they are on differnt forms and there are arrays of text boxes as well Is there a way to send my property values to all of them at one oposed to text1.font= you get the point or is there a way to find out what textboxes are on my forms

thanks in advance
i need to set the font,font size,itallics,bold
so you get the point alot of dull work
spooke2k


If you modify this code then you may find the answer... just have a look
Im using this methods for my applications


Public Sub EnableFields(frm As Form, frm2 as Form, Frm3 as form)

Dim lintIncrement As Integer
Dim lIntControlsCount As Integer

lintIncrement = 0
lIntControlsCount = frm.Count - 1

Do While lintIncrement <= lIntControlsCount

If TypeOf frm1.Controls(lintIncrement) Is TextBox Then
frm.Controls(lintIncrement).text="Hi"
frm.Controls(lintIncrement).font = "Arial"
End If

lintIncrement = lintIncrement + 1

Loop

End Sub