Visual Basic - ENCONTRAR CARACTERES EN UN TEXT

Life is soft - evento anual de software empresarial
 
Vista:

ENCONTRAR CARACTERES EN UN TEXT

Publicado por YoMeRo (1 intervención) el 03/10/2000 00:00:00
HoLa

DISCULPEN MI IGNORANCIA, PERO YO RECUERDO QUE EXISTE UNA FORMA DE BUSCAR UN CARACTER ESPECIFICO EN VB5, Y CREO QUE ES CON "STRCMP" Y LA VERDAD YA NO ME ACUERDO DE COMO SE UTILIZA CORRECTAMENTE, EL CASO ES QUE CUANDO LO USO NO HACE LO QUE YO QUIERO, POR EJEMPLO

BUSCAR UNA / EN EL SIGUIENTE TEXT
AÑO/DIA
Y QUE ME DE COMO RESULTADO LA POSICION DE LA DIAGONAL EN ESTE CASO 4
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:ENCONTRAR CARACTERES EN UN TEXT

Publicado por tecniCam (220 intervenciones) el 03/10/2000 00:00:00
Hola anonimo@a:
La función que dices es StrComp y no StrCmp, por ejemplo:
MiCadena1 = "ABCD": MiCadena2 = "abcd" ´ Define las variables.
MyComp = StrComp(MiCadena1, MiCadena2, 1) ´ Devuelve 0.
MyComp = StrComp(MiCadena1, MiCadena2, 0) ´ Devuelve -1.
MyComp = StrComp(MiCadena2, MiCadena1) ´ Devuelve 1.

Y la función que necesitas es InStr, a saber:
CadenaBusqueda ="XXpXXpXXPXXP" ´ Cadena en la que se busca.
CaracterBusqueda = "P" ´ Se busca "P".
´ Una comparación textual que comienza en la posición 4. Devuelve 6.
MiPos = InStr(4, CadenaBusqueda, CaracterBusqueda, 1)
´ Una comparación binaria que comienza en la posición 1. Devuelve 9.
MiPos = InStr(1, CadenaBusqueda, CaracterBusqueda, 0)
´ La comparación es binaria por configuración predeterminada (si se
´ omite el último argumento).
MiPos = InStr(CadenaBusqueda, CaracterBusqueda) ´ Devuelve 9.
MiPos = InStr(1, CadenaBusqueda, "W") ´ Devuelve 0.
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