Textbox Characters

[Bill]

I would like to eliminate 'periods' or 'spaces' at the end of any text that
is entered into a textbox. Is there any code that would do this? Thanks!

 

[Doug Robbins - Word MVP]

The Trim Function will delete spaces. To remove periods, use


Do While Asc(Right(TextBox1.Text, 1)) = 133
TextBox1.Text = Left(TextBox1.Text, Len(TextBox1.Text) - 1)
Loop


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP