Fredg,
Thanks so much! This is so cool. I think I can make it do what I want now.
Thanks again.
RandyM
"fredg" wrote:
> On Tue, 21 Feb 2006 08:34:45 -0800, fredg wrote:
>
> > On Tue, 21 Feb 2006 08:20:32 -0800, WCDoan wrote:
> >
> >> Joan,
> >> Thanks for the help. I deleted the label and now you can see that you're
> >> on the check box. Someone said in another post you could make the check box
> >> larger, but I haven't been able to do that. Could you clue me in on how to
> >> enlarge the check box itself? And, thanks again for your help and quick
> >> repsonse. I'm slowly learning how to use Access and VBA, but I have a long
> >> way to go.
> >>
> >> Thanks,
> >> Randy M
> >>
> >> "Joan Wild" wrote:
> >>
> >>> If the checkbox has an attached label, then you'll see the focus is on the
> >>> label (dotted line around it). Without an associated label, then the focus
> >>> is on the checkbox (dotted line inside the border of the checkbox). Hitting
> >>> the spacebar will toggle the check while it has the focus.
> >>>
> >>> --
> >>> Joan Wild
> >>> Microsoft Access MVP
> >>>
> >>> WCDoan wrote:
> >>>> I have several check boxes on a form, but it seems that you can't
> >>>> tell if you're on a check box or not. When I tab from a text field to
> >>>> the check box, it's not obvious that I'm at the check box. I think
> >>>> this would confuse a user entering info. Is this the way check boxes
> >>>> work? You just have to know where you are on the form. I'm a beginner
> >>>> in Access and VBA, so this may just be 'the way it is'. Hope not.
> >>>> Thanks in advance for any help anyone has on this. Randy M
> >>>
> >>>
> >
> > You can't make it bigger but you can work around it.
> > Here is the coding needed.
> >
> > Set your actual CheckBoxName.Visible to No.
> >
> > Add an unbound label to the form detail section.
> > Set its Caption to " " ( a space)
> > Set it's Font to WingDings
> > Set it's font size to whatever you want (perhaps 24)
> > Place this label where you wish to see the check mark.
> > Set it's special effects to Sunken (if you want).
> > Set it's BackColor to White (if you want).
> > I've named it LabelLargeCheck.
> >
> > Code the new Label's Click event:
> >
> > Private Sub LabelLargeCheck_Click()
> > [CheckBoxName] = Not ([CheckBoxName])
> > If [CheckBoxName] = True Then
> > LabelLargeCheck.Caption = Chr(252)
> > Else
> > LabelLargeCheck.Caption = " " ' a space
> > End If
> > End Sub
> > ==========
> > Code the Form Current Event:
> >
> > Private Sub Form_Current()
> > If Me.CheckBoxName = True Then
> > LabelLargeCheck.Caption = Chr(252)
> > Else
> > LabelLargeCheck.Caption = " " ' a space
> > End If
> > End Sub
> > ===========
> >
> > If you want a CheckBox field label then just add another unbound label
> > and set its caption to the CheckBox field name. Leave it Visible.
> >
> > Don't forget to change the name of the CheckBoxName in this coding to
> > whatever your Checkbox field is.
> >
> > After you open the form and use the check box label,
> > re-adjust the font size if needed, and the size of the label,
> > to square it around the check mark.
> > That should do it.
> >
> > Note: because it's a label now, you can also change it's color, if you
> > want.
> >
> > Clicking on the new Label is equivalent to clicking on the CheckBox
> > field itself.
>
> As an afterthought, you might want to set the label to =chr(254)
> instead of =chr(252) for True. If you want the empty square box when
> the value is False, use ="o" (small letter o) instead of = " ".
> Try it both ways and see which one you like better.
> --
> Fred
> Please respond only to this newsgroup.
> I do not reply to personal e-mail
>
|
Similar Threads
