Change Check Box Size

  • Thread starter Thread starter Guest
  • Start date Start date
No it's not possible, but here are some great work-arounds from
MVP FredG and Doug Steele:

FredG
Can't make it bigger but you can work around it.
Here is the coding needed.

Add an unbound label to the form detail section.
Set its Caption to "o" (small letter "o")
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.
I've named it LabelLargeCheck.
Set the actual CheckBox.Visible to No.

Code the Label's Click event:

Private Sub LabelLargeCheck_Click()
[CheckBox] = Not ([CheckBox])
If CheckBox Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub

Code the Form Current Event:

Private Sub Form_Current()
If [CheckBox] Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
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 CheckBox in this
coding to whatever your Checkbox field is.
That should do it.

Clicking on the new Label is equivalent to clicking on the
CheckBox field itself.

Fred
Also,
From MVP Doug Steele:

See my March, 2004 "Access Answers" column in Pinnacle Publication's "Smart
Access".

You can download the column (and accompanying database) for free at
http://www.accessmvp.com/djsteele/SmartAccess.html
[/QUOTE][/QUOTE][/QUOTE]

Hope that helps,
--
Jeff Conrad
Access Junkie - MVP
http://home.bendbroadband.com/conradsystems/accessjunkie.html
http://www.access.qbuilt.com/html/articles.html

in message:
 
Back
Top