Visual Basic - controlar que el text1 venga con valor

amigos,

como hago una rutina en un modulo que me sirva para esto.
1) validar que en el text1, o text2 o el que sea , se digiten valores del 0 al 9 o letras del a a la z o de la A a la Z
QUE cuando se digites no se dejen espacios en blanco asi.

001AAB
AAB001
001
AAA
ABC
A
1
0
0Z10A

CUALQUIERA DE LOS DE ARRIBA ES VALIDO.

Y luego si lo hizo como es debido sin blancos INTERMEDIOS entonces sigo al otro text2 cuando digite enter, sino no lo dejo pasar.

lo deseo poner en un modulo, para que me sirva en todo el proyecto
y solo mandarle parametros.

saludos.

Talvez lo que puedes hacer es recorrer el string que te devuelve la funcion textbox.text y asi te das cuenta si trae espacios intermedios o no

En el evento Key Press de la caja de texto escribe
if keyascii=32 then keyascii=0
El 32 es el código Ascii del espacio
El Tabulador es el 9 y el Intro el 13
Puedes usar el mismo sistema para anular uno y probocar el otro

José, te sugiero que te esfuerces un poco más, pero aún así te mando un código probado que hace lo que tu dices, sólo acepta letras mayúsculas o minusculas y los números del 0 al 9, no permitiendo escribir cualquier otra cosa incluyendo el espacio y al dar la tecla enter salta al otro objeto en el orden que especifiques en Tabindex
Este código va en el evento Keypress del textbox, solamente te dejo pasarlo a función en tu modulo para que lo utilices en cualquier punto
If KeyAscii = 13 Then 'Si presionas el enter
SendKeys "{Tab}" 'Saltara al siguiente control
ElseIf KeyAscii <> 8 Then 'Es la tecla de retroceso
Select Case KeyAscii
Case 97 To 122 'De la "a" a la "z"
Case 65 To 90 'De la "A" a la "Z"
Case 48 To 57 'Del 0 al 9
Case Else 'Cualquier otra
KeyAscii = 0 'Se elimina el teclazo
'Incluyendo el espacio que es el 32
End Select
End If

Saludos desde México