Counting number of characters inside textbox?

Hi
How can i count the number of characters that is inside a textbox?

Thanks in advance!

Code:

---

Dim textlen as integer
textlen = Len(text1.text)
'textlen contains number of characters

---