Hola, estoy tratando de rescatar un pedazo de la data que me da MSComm1.Input, el dato util lo tengo despues de las letras "NMBR".-
me pueden dar una mano para rescatar este dato !
Ejemplo (TIME=1253 NMBR=0112563479 )
Resultado = 0112563479
GRacias
Sebastian
En que lenguaje es?
Parece VB ... siendo así creo que con un par de for puedes delimitar el principio y el final del dato y con $mid o algo así para tomar esta cadena y ya la tienes en la mano, o sea, especifica un poco mejor el problema para que podamos ayudarte.
Saludos.
Gracias por el click.
Claro esa es la idea, utilizar mid.
creo que el ejemplo no fue tan bueno.
La cadena la tomo desde MSComm1.Input. el tema es como utilizo "mid"
cadena (TIME=1253 NMBR=0112563479 ) " este es el data que viene desde
MSComm1.Input.
Resultado = 0112563479 y este tiene que ser mi resultado.-
Sebastian
Yo no se visual basic pero creo que seria algo como
n = length( cadena )
for i = 6 to n
if cadena(i) = '=' then goto listo
next
listo:
Resultado = "Resultado = " + mid(cadena, i +1, n-2 )
empezando en 6 me paso el fijo "TIME=" y esquivo el variable 1234 ... luego busco el otro igual y creo la cadena.
Algun visualbasiquero que lo arregle por favor, creo que es todo lo que puedo decir y seguramente es incorrecto pero el camino puede será algo como este.
Mas facil aun:
Const Total As String = "TIME=1253 NMBR=0112563479"
Dim Resultado As String
Resultado = Right$(Total, Len(Total) - InStrRev(Total, "="))
MsgBox Resultado
Salu2... ;)
P.D.: Pogacha, como osas usar la instruccion prohibida Goto!!! xDDD
Por que programaba Basic en la primera mitad de mi vida, cuando tenia 12 años ... hace mas de 13 años, y para la spectrum que no tenia semejantes funciones como "InStrRev" :P
Saludos.