Resize check box and have "x" instead of a check

T

Tim

Is it possible to resize the size of the check box? I know
I can resize the text portion of a check box, but I would
like to make the box larger.
I would also like to change the check mark to an 'X', is
that possible?

Thanks
Tim
 
W

Wouter HM

Tim,

It is not possible to change the size or use a 'X'.
There is a way to simulate.
Use 2 Label.
1: Borderstyle: 1
Name: Chk1
Caption: "X"
Font: The size you like
Size: to fit the "X"
Location: Where you like it to be
2: Borderstyle: 0
Name: Lbl1
Caption: Your text
Font: The size you like
Size: minimaal to fit the text
Location: Directly left / or right to label 1


Add some code to the worksheet the labels are on:
Public blnCheck As Boolean

Private Sub lblCheck_Click()
Call swapCheck
End Sub

Private Sub lblClick_Click()
Call swapCheck
End Sub

Private Sub swapCheck()
blnCheck = Not blnCheck
lblCheck.Caption = IIf(blnCheck, "X", "")
End Sub

Good luck,

Wouter HM
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top