Visual Basic - estraer numeros de una cadena

hola
como puedo estraer los numeros de una cadena variando segun los
dos primeros digitos

ejemplo:
la cadena es esta 2101234007449
como puedo decirle que si enpieza por 21 me estraiga 744 y que me lo
represente 7,44.
y si empieza por otra numeracion que no sea 21 que aga el procedimiento de evento .
gracias

no se si te sirve.. y eta un poco engorrosa la explicacion pero el condicionante en este caso de la instruccion IF seria una funcion LEFT$

ejemplo :

A = str$(2101234007449) lo convertimos a string, si no lo es

Left$(A,2) ' extrae 2 caracteres iniciales de la variable, osea 21

'ahora con un if o un select puedes determinar que hacer .. en el caso de tu pregunta seria:

IF A = "21" then
' si quiero extraer el 744 seria con la funcion Mid$
N = Mid$(A,10,2) + ","+ Mid$(A,12,1)
'si quiero que sea numero lo convierto
N= val(N)

end if
' Mid$(A,10,2) en este caso 10 es la posicion inicial desde donde extaigo y 3 la cantidad de caracteres que extraigo, obiamente de A

pal resto usa el mate
listo chao