Form Settings

[ray_charles]

Hello: I want to use VB to make a mass change to all
forms and controls changing the Fore Color, Back Color, Border Color, and setting Form Picture to = (none).

Has anyone here ever done this? If so, could you share your
code with me?

Thanks . . . Ray . . .

 

[Rob.Mills]

Use a For Each procedure:

Dim ctl as Control
For Each ctl in Forms!FormName
ctl.ForeColor=###
ctl.BackColor=###
' etc.
Next ctl

 

[ray_charles]

Thank you ! ! !

 

[ray_charles]

Ok. That works, but, how do I make this so that I can
type in a form name, and have the procedure find the
form entered, then do the for loop setting the properties?

Thanx ray . . . .

 

[Rob.Mills]

Setup this procedure in a module

Public Function Properties(frm as Form)

Dim ctl as Control
For Each ctl in frm
ctl.ForeColor=###
ctl.BackColor=###
' etc.
Next ctl

End Function

Then you can put this code in any event in any form. Just set the event to:

=Properties(Forms!FormName)