Increase Check Box Size

[PPCO]

Is there a way to increase the size of a check box on a form? Thanks

 

[Jerry Whittle]

Unfortunately not with the standard check box. You could create your own
using a text box and some fancy code to mimic a check box.

 

[Douglas J. Steele]

As Jerry says, no, but you can simulate it.

Take a look at my March, 2004 "Access Answers" column in Pinnacle
Publication's "Smart Access". You can download the column (and sample
database) for free at http://www.accessmvp.com/DJSteele/SmartAccess.html

 

[fredg]

Is there a way to increase the size of a check box on a form? Thanks

In Single Form View?
You can't make it bigger but you can use a work around.

For use on a form in Single Form View.

Add an unbound text control to the form.
Set it's FontStyle to Wingdings.
Set it's FontSize to 24 (to start with).
Set the control's Width property to 0.3"
Set it's height to 0.3"
Set it's BorderStyle to Solid.
Border Width to 1 pt.
Name this control 'LargeCheck'.

Code it¢s click event:

Me.[CheckBoxName] = Not Me.[CheckBoxName]
If Me.[CheckBoxName] = True Then
Me.LargeCheck = Chr(252)
Else
Me.LargeCheck = ""
End If

Code the Form's Current event:

If Me.[CheckBoxName] = True Then
Me.LargeCheck = Chr(252)
Else
Me.LargeCheck = ""
End If

Clicking the cursor on the LargeCheck control will toggle it's value
just as a regular check box.
Note: You can colorize this control also.

Change the FontSize and the controls width and height as wanted.

 

[PPCO]

Thanks for the help everyone!

Is there a way to increase the size of a check box on a form? Thanks

In Single Form View?
You can't make it bigger but you can use a work around.

For use on a form in Single Form View.

Add an unbound text control to the form.
Set it's FontStyle to Wingdings.
Set it's FontSize to 24 (to start with).
Set the control's Width property to 0.3"
Set it's height to 0.3"
Set it's BorderStyle to Solid.
Border Width to 1 pt.
Name this control 'LargeCheck'.

Code itʼs click event:

Me.[CheckBoxName] = Not Me.[CheckBoxName]
If Me.[CheckBoxName] = True Then
Me.LargeCheck = Chr(252)
Else
Me.LargeCheck = ""
End If

Code the Form's Current event:

If Me.[CheckBoxName] = True Then
Me.LargeCheck = Chr(252)
Else
Me.LargeCheck = ""
End If

Clicking the cursor on the LargeCheck control will toggle it's value
just as a regular check box.
Note: You can colorize this control also.

Change the FontSize and the controls width and height as wanted.