coding to refer to multiple checkboxes and labels

[tammiep]

Hello Everyone,
Wondering if anyone can help me with this.

I have a form with several checkboxes (~50) on it. What I would like to do is have the label of each checkbox (the name of each label begins with lbl) change to the RGB value of (210, 0, 0) if the checkbox is checked. So, the labels all start off black, but to make it easier for the user to see which checkboxes have been ticked, I would like all the checked ones to have red labels.

I was using IF Else in the afterupdate event of each checkbox, but wondered if there was a way using wildcards to refer to all of the checkboxes and labels at once. All checkbox names start with"chk" and all labels start with "lbl".



Thanks,
Tammie

[ajetrumpet]

there needs to be consistency with the names Tammie. You need to be able to identify the names of the controls. make sense? e.g. -

dim c as control

for each c in me.controls
   if instr(c.name, "checklbl")>0 then 'IT IS A CHECKBOX LABEL
      //CHANGE THE COLOR
   end if
next c

does that make sense? codify your controls so they are "loopable"

[tammiep]

Thanks very much Adam--I will give this a try.