forms/fields

[Guest]

is there a way to use a WITH statement referencing all fields on a form
without having to use their individual names.

I need to set the .forecolor and .backcolor of all fields on all of my forms
each time a form is opened.

Any help would be apprecieated...thank you!

 

[Dirk Goldgar]

is there a way to use a WITH statement referencing all fields on a
form without having to use their individual names.

I need to set the .forecolor and .backcolor of all fields on all of
my forms each time a form is opened.

Any help would be apprecieated...thank you!

You can loop through the form's Controls collection, like this:

Dim ctl As Access.Control

On Error Resume Next

For Each ctl In Me.Controls
ctl.ForeColor = ...
ctl.BackColor = ...
Next ctl

The "On Error Resume Next" is to ignore the errors for any controls that
don't have these properties.

 

[baud]

You can also have a look at
http://groups.google.com/group/micr...hange+default+control&rnum=1#aaaff496a7e7e5bb

You will see how to change the default value of a property of elements
of the Toolbox.