Tick box enlarged

Posted on 2004-11-11
Last Modified: 2008-02-01
is there any way to enlarge the tick box on a form

i'm not very farmilier with access so a detail explanation would be prefered

thanx for your time and help
Question by:gangsterboss
    LVL 39

    Expert Comment

    unfortunately ... no ... the size of the checkbox is fixed. You cold use a texbox and set the font to an appropriate size and then add / remove the letter "X" in the click event and then translate that to your field that is expecting -1 or 0. More work than it is worth.

    LVL 58

    Accepted Solution

    To create a Large Checkbox, you need three controls...

    1) you have a check box, let's call it chkTiny, with a label. In the properties, set the width and height to 0, this will leave only a tiny grey spot.

    2) create a textbox, for example txtTinyLARGE, with the control source set to:
        = IIf( chkTiny, "a", "")
    Set the following properties: Enabled: No, Locked: Yes.
    Set the font to something where "a" looks like a check mark, i.e. Webdings...
    An of course, choose a large font size and enlarge the text box...
    Ah, yes, delete its label...

    Now you have a large check box. The only problem left is that you can check it only by clicking on the label, not on the "check box" itself... This is where the third control comes in:

    3) Create a button, having the same size as txtTiny, exaclty *over* it (hiding it). Let's call it cmdCheckTiny.
    In the properties of the button, set Transparent: Yes, and Tab Stop: No
    Then go to the "On Click" property, select "[event handler]" and press the builder button: [...]

    In the module, adjust the code to read:

    Private Sub cmdCheckTiny_Click()
        chkTiny = Not chkTiny
    End Sub

    There you go.... As Steve said... probably "more work than it is worth"...

    LVL 58

    Expert Comment

    Hmm, when I say "by clicking on the label", I mean of course the label of the check box, that is still visible...
    LVL 58

    Expert Comment

    Maybe I should mention another trick here...

    If you consider the boxes too small for clicking on them, not for reading them, you can enlarge the label to cover an area around the check box itself:

        | click here:        [v]       |

    This way, a slight "misclick" will still check/uncheck the box.

    LVL 58

    Expert Comment

    Yet another afterthought...

    By using the last solution, i.e. a large label, you could leave step 3) out... no need for a tranparent button as the checkbox label will do the job quite well!

    Out for now :)


    Featured Post

    Highfive Gives IT Their Time Back

    Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

    Join & Write a Comment

    Most if not all databases provide tools to filter data; even simple mail-merge programs might offer basic filtering capabilities. This is so important that, although Access has many built-in features to help the user in this task, developers often n…
    In a multiple monitor setup, if you don't want to use AutoCenter to position your popup forms, you have a problem: where will they appear?  Sometimes you may have an additional problem: where the devil did they go?  If you last had a popup form open…
    As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
    What’s inside an Access Desktop Database. Will look at the basic interface, Navigation Pane (Database Container), Tables, Queries, Forms, Report, Macro’s, and VBA code.

    746 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    16 Experts available now in Live!

    Get 1:1 Help Now