Visual Basic 6 - Verifica di regex e interruzione del ciclo

Devo controllare un testo carattere per carattere e fare una determinata cosa fintanto che ci sono numeri e finire il controllo appena si trova un carattere che NON è un numero

Per ora sono messo così:

Dim re2 As New RegExp
Dim m2 As Match
re2.Pattern = "[0-9]"
re2.Global = True

Dim ctr As Integer
Dim chrl As String
For ctr = 1 To Len(sLines(N))
chrl = Mid(sLines(N), ctr, 1)
For Each m2 In re2.Execute(chrl)
Text1.Text = Text1.Text + chrl
Next

Ovviamente facendo il controlo con un "For Each" non posso fare due alternative, una nel caso in cui si trovi il numero e un altro in cui si trovi una lettera...
Dovrei quindi cambiare il controllo con un "If".

Come si fa? Ci ho provato ma non ci sono riuscito...

Come non detto, ho creato una variabile boolean chiamat RegValid e risolto come segue:

RegValid = re2.Test(chrl)
If RegValid = True Then