Max Chars in a textbox

[Arg81]

Just a quickie...I've seen a post in the forums but it's for an ASP.net form, and I need to do something similar on a windows form (vb.net)

I have a MULTILINE textbox, with a database maximum for that field of 1000. I want to make sure that once 1000 characters have been entered into that textbox, no more can be added.
And if possible add a label so that it counts the charaters in the textbox (and also reclaim them when deleting / backspacing).

I did see something but it was using Javascripts with ASP

Is this possible for a win form?

Thanks in advance
Luke

 

[Arg81]

OK got max length sorted - I read that using the MaxLength property doesn't work with Multiline textboxes, but it seems to work fine on my project.

So all i need is a character counter if possible....

Luke

 

[JohnH]

Use the TextChanged event in combination with the Textlength property. TextChanged event is available for the web control too, but in web apps 'server' roundtrips (postbacks) are expensive and tried avoided by using client executing Javascripts, use all the events in win apps regardless!

 

[Arg81]

OK me again

Maybe not the best way but it does the job...

Private Sub textbox1_keypress......
 
me.lblTextCount.text = me.Textbox1.maxlength - me.textbox1.length
 
End Sub

However, it doesn't update on Paste (Ctrl+v) or when you delete all the text and start again (it ignores the first key press)

 

[Arg81]

Thanks John - changed from keypress to textchanged and works perfectly

Cheers