Sorry I forgot the imports:

Imports System.Text.RegularExpressions

Or use this code instead:

Dim re As New System.Text.RegularExpressions.Regex("[a-zA-Z]")
Me.Text = re.Matches(TextBox1.Text).Count

Where is Me.Type?

Its Me.TEXT