onestopfinancial
asked on
Remove border from checkbox
Hello,
How can I remove the border from and enlarge the checkbox control. I changed the format properties as follows:
Special Effect - Flat
Border Style - Transparent
Border Width - Hairline
Border Color - 0
I want the only the check mark to show, and be a bigger check mark.
Is this the best I can do?
How can I remove the border from and enlarge the checkbox control. I changed the format properties as follows:
Special Effect - Flat
Border Style - Transparent
Border Width - Hairline
Border Color - 0
I want the only the check mark to show, and be a bigger check mark.
Is this the best I can do?
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
This is what I would do:
1) create your ugly set of check boxes which could be named ck_bx_1 through c_bx_9 (assuming 9 check boxes)
and stick these in an part of the form where you do not want the check boxes to ultimately appear. (You can move them later)
2) set the visible property of all of these off
3) Where you do want the first check box to appear, place an image object linked to whatever check mark image you like, such as CHECKMRK.BMP and next to it put a label object. Assume that these are called IMAGE1 and LABEL1, respectively.
4) Set the click event on LABEL1 so that it has the same effect as clicking the first checkbox and make sure that the check mark appears or disappears depending on the check box state.
Private Sub Label1_Click()
Ck_bx_1.Value = Not Ck_bx_1.Value
Image1.Visible = Ck_bx_1
End Sub
5) Repeat 3 and 4 for remaining check boxes
6) Make sure that eveything starts correctly by adding the appropriate code to the ON LOAD event of the form
Private Sub Form_Load()
Image1.Visible = Ck_bx_1
Image2.Visible = Ck_bx_2
' . . .
Image8.Visible = Ck_bx_8
End Sub
1) create your ugly set of check boxes which could be named ck_bx_1 through c_bx_9 (assuming 9 check boxes)
and stick these in an part of the form where you do not want the check boxes to ultimately appear. (You can move them later)
2) set the visible property of all of these off
3) Where you do want the first check box to appear, place an image object linked to whatever check mark image you like, such as CHECKMRK.BMP and next to it put a label object. Assume that these are called IMAGE1 and LABEL1, respectively.
4) Set the click event on LABEL1 so that it has the same effect as clicking the first checkbox and make sure that the check mark appears or disappears depending on the check box state.
Private Sub Label1_Click()
Ck_bx_1.Value = Not Ck_bx_1.Value
Image1.Visible = Ck_bx_1
End Sub
5) Repeat 3 and 4 for remaining check boxes
6) Make sure that eveything starts correctly by adding the appropriate code to the ON LOAD event of the form
Private Sub Form_Load()
Image1.Visible = Ck_bx_1
Image2.Visible = Ck_bx_2
' . . .
Image8.Visible = Ck_bx_8
End Sub
Hmm ... my suggestion works nicely and is dynamic too as no code is used to set the appearance.
/gustav
/gustav
Choose font to Wingdings.
Set Format property to:
"";\û[Red];""
Adjust fontsize as you wish.
/gustav