Visual Basic - Visual Basic 6 Extraer numeros entre / (Barra)

Hola Buenas tarde !
Con este código resolví el tema de eliminar las / de los texto.
Ahora tengo otro problema que no encuentro la forma de realizarlo..
Ejemplo: tengo un Texto, su dato es 15/15248/25
Tengo que extraer los números dentro de la / y pasarlo a una variable por ejemplo
me tiene que quedar 15248
Ayuda !
Desde ya Saludos.

dim b ()
b=split(text1.text,"/")
c=split(1)

el resultado que querés está en la variable c
esto funciona siempre y cuando el valor que querés extraer esté después de la primera "/"