sabersi una cadena contiene cierto parecido

Question

Saludos deseo hacer una comparacion de una cadena de texto ejemplo "hola mundo1 nuevo" o tambien "Nuevo mundo1 Hola" o "mundo1 nuevo hola" deseo buscar en el texbox la identificacion de la palabra mundo1 si no lo encuentra me haga alguna accion y si no la encuentra haga otra accion.

If TextBox1.Text =  saber si contiene el texto no importando el lugar que este en la cadena
'''''VALOR VERDADERO
        Else
            ''''''VALOR FALSO

        End If

Answer 1

Hola George

Tu planteamiento es archiconocido como "Damerau–Levenshtein distance" que es Calcular la similitud entre dos cadenas. Es decir:

Es una métrica de cadena para medir la distancia de edición entre dos secuencias. De manera informal, la distancia Damerau-Levenshtein entre dos palabras es el número mínimo de operaciones (que consisten en inserciones, eliminaciones o sustituciones de un solo carácter, o transposición de dos caracteres adyacentes) necesarias para cambiar una palabra por otra. La técnica se puede aplicar a cada palabra o al texto completo y da un valor numérico de cuan es la distancia entre los términos comparados.

No te voy a hacer un copia y pega del código por respeto a los múltiples creadores de este algoritmo y por su variabilidad en los resultados. Búscalos directamente tú y elije el que más se te adapte a tus necesidades.

Naturalmente presupongo que conoces el contains de un texto respecto de otro que es un tema mucho más banal.

Un saludo

Answer 2

Saludos deseo hacer una comparacion de una cadena de texto ejemplo "hola mundo1 nuevo" o tambien "Nuevo mundo1 Hola" o "mundo1 nuevo hola" deseo buscar en el texbox la identificacion de la palabra mundo1 si no lo encuentra me haga alguna accion y si no la encuentra haga otra accion.

En resumidas cuentas, tal como lo explicas en el comentario, lo único que te importa es si la frase contiene la palabra, y el resto de la cadena es irrelevante. En ese caso lo más simple es utilizar la función Contains:

If TextBox1.Text.Contains("mundo1")
            '''''VALOR VERDADERO
        Else
            ''''''VALOR FALSO
        End If

Answer 3

Hola George_aprendiendo,

Espero que te encuentres bien.

¿Hay alguna novedad sobre la consulta realizada?

¿Fue útil la respuesta dada por los compañeros?

En efecto, como menciona Alberto, puedes usar Contains para saber si existe "mundo1".

Gracias por usar los foros de MSDN.

Benjamin G,

---

Recuerde "marcar como respuesta" las respuestas que resolvieron su problema, es una forma común de reconocer a quienes ayudaron y facilita que otros visitantes encuentren la solución más adelante.

Si tiene algún cumplido o queja sobre el soporte técnico de MSDN, no dude en ponerse en contacto con [e-mail]

Answer 4

Hola George_aprendiendo,

Espero que te encuentres bien.

No hemos tenido noticias sobre tu caso, ¿todavía necesitas ayuda? En caso afirmativo, haznoslo saber y con gusto te ayudamos.

Gracias por usar los foros de MSDN.

Benjamin G,

---

Recuerde "marcar como respuesta" las respuestas que resolvieron su problema, es una forma común de reconocer a quienes ayudaron y facilita que otros visitantes encuentren la solución más adelante.

Si tiene algún cumplido o queja sobre el soporte técnico de MSDN, no dude en ponerse en contacto con [e-mail]

Answer 5

Buenas tardes, yo crearía una variable text, ejemplo: dim TextoPar as string, en esta variable almaceno la primera palabar del primet textbox: TextoPar = mid(textbox1.text,1,instr(textbox1.tex," ")-1), luego busco esa palabra en el otro textbox: if instr(textbox2,TextoPar)= 0 then......, si es = a 0 es por que no esta, por este metodo identifico si las palabras del primer textbox esta dento del otro, si la primera esta, asigno a TextoPar = replace(textbox1,TextoPar,""), asi obtengo solo las otras palabras, esto se puede repetir las veces que sea necesario, te doy una idea, cuenta los espacios en blanco del primer textbox y crea un for next, saludos.

Answer 6

Hola George_aprendiendo,

Esperamos que te encuentres bien. No hemos escuchado noticias de en relacion al caso.

Procederemos a cerrar el caso por inactividad. Si aun tienes preguntas sobre tu caso aun puedes contestar y reabriremos tu caso, o bien puedes abrir otro foro.

Gracias por usar los foros de MSDN.

Benjamin G,

---

Recuerde "marcar como respuesta" las respuestas que resolvieron su problema, es una forma común de reconocer a quienes ayudaron y facilita que otros visitantes encuentren la solución más adelante.

Si tiene algún cumplido o queja sobre el soporte técnico de MSDN, no dude en ponerse en contacto con [e-mail]