text box

[Muascott]

hello all again,

Is it possible to use a text box that if you click inside it with the mouse that a Tick symbol appears with one click and clears with another click.

considering that the checkbox size cant be modified I need a checkbox that is larger than the one in forms or control.

any help would be great

thanks

 

[erik.van.geit]

Is it possible to use a text box that if you click inside it with the mouse that a Tick symbol appears with one click and clears with another click.

Hi, Muascott,
set the font to wingdings
and try this code

Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
TextBox1 = IIf(TextBox1 = "", Chr(252), "")
End Sub

kind regards,
Erik