Visual Basic - numeros

Hola a todos!!

tengo una duda, es una chorrada pero me facilitaría bastante las cosas: necesito saber como poner un intervalo de números para compararlo con un carácter de una cadena, es decir:
tengo StrCadena= "perro", y necesito saber cogiendo caracter a caracter si es un numero.

for i=1 to len(StrCadena)
if mid(StrCadena,i,1)=0-9 then
q haga lo q sea
end if
next i

había puesto esto, pero creo q no hace la comparación, como puedo poner todos los numeros en una sola sentencia¿?¿? no se si me explico, en sql sería algo así como .. in (1,3,5) y te buscaría los valores q conincidiesen con los del parentesis, pero no se si en visual hay algo asi. Además es q creo q no me compara bien. Le puse un Val a la condicion del if pero creo q es peor... Bueno a ver si podeis ayudarme, muchas gracias de todas formas chicos.

Puedes hacer:

for i=1 to len(StrCadena)
if IsNumeric(mid(StrCadena,i,1)) then
' q haga lo q sea
end if
next i