To find the length of the text in a textbox you can use :

VB Code:
  1. RichTextBox.Text = Len(Text1.Text)

That should be in the _Change event of Text1.