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

Life is soft - evento anual de software empresarial
   
Vista:

Visual Basic 6 Extraer numeros entre / (Barra)

Publicado por Carlos Alberto carlosiliams@gmail.com (5 intervenciones) el 06/06/2016 16:26:05
1
2
3
4
Dim xSoloTexto As string
        xSoloTexto = Text1.Text
        xSoloTexto = Replace(xSoloTexto, "/", "")
Text1.Text = xSoloTexto

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.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Visual Basic 6 Extraer numeros entre / (Barra)

Publicado por Facundo (58 intervenciones) el 12/06/2016 21:46:20
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 "/"
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar