Visual Basic - MID HASTA UN CIERTO CARACTER

Life is soft - evento anual de software empresarial
 
Vista:

MID HASTA UN CIERTO CARACTER

Publicado por Javier E. Salvay (49 intervenciones) el 30/04/2006 15:38:08
Hola a todos, aca les va mi duda.... a ver si alguien se le ocurre algo o sabe como es.

Tengo un Textbox en el cual tengo el siguiente texto "Orden P 54 - VIERJAMED", el cual puede variar el número (54) por cualquier otro y el nombre (VIERJAMED) por cualquier otro.

Lo que necesito es leer el número, para grabarlo en una var. Hasta ahora tengo el siguiente code

------------------------------------------------------------------------------------------------------------
Proto = Mid(Text1, 9, 2)
------------------------------------------------------------------------------------------------------------
Que hago que del caracter 9, oesa después de "Orden P " que lea 2 caracteres. Hasta ahí perfecto.

PROBLEMA:'si el númro llega a ser de 3 cifras me leería 2 nomás.

PREGUNTA: Hay algo cómo para que lea el número hasta el caracter " -" ???

Yo probé con ..... Proto = Mid(Text1, 9, " -"), pero no paso nada.

please help !!!

gracias y nos vemos

Javier ;)
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

RE:MID HASTA UN CIERTO CARACTER

Publicado por Cecilia Colalongo (3117 intervenciones) el 30/04/2006 15:55:25
Revisa la función InStr:

InStr(p,"-")

Para el caso que planteas:

Val(Replace(Left(p,InStr(p,"-")-1),"Orden P",""))
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