Cadena de texto
Publicado por Carlos Alberto (5 intervenciones) el 02/06/2016 18:45:06
Hola !!
Necesito extraer los números entre las / ejemplo
24/14528/45 de esta cadena me tiene que quedar 14528
con esta función logro quitarle las barra (/) pero no logro lo anterior
EL TEXBOX TIENE ESTE NUMERO ... 24/14528/45
LA VARIABLE TERMINA CON 241452845
====================================
Si alguno me puede ayudar con esto seria Ok ...
Saludos a todos
Necesito extraer los números entre las / ejemplo
24/14528/45 de esta cadena me tiene que quedar 14528
con esta función logro quitarle las barra (/) pero no logro lo anterior
EL TEXBOX TIENE ESTE NUMERO ... 24/14528/45
1
2
3
4
5
6
7
8
9
10
Private Sub Command1_Click()
Dim xSoloTexto As String
xSoloTexto = Me.Text1.Text
xSoloTexto = Replace(xSoloTexto, "/", "")
Me.Text2.Text = xSoloTexto
End Sub
LA VARIABLE TERMINA CON 241452845
====================================
Si alguno me puede ayudar con esto seria Ok ...
Saludos a todos
Valora esta pregunta
0