Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: agus0 en 11 Febrero 2010, 17:03 pm

Título: [Resuelto] Como hago para que HOLA = hola?
Publicado por: agus0 en 11 Febrero 2010, 17:03 pm

Hola foro que tal??

bueno nada me surigo la siguiente duda.

Supongamos que tengo un Textbox(Text1) y yo quiero hacer por ejemplo esto:

Código:

if text1.text = "hola" then
msgbox "Hola!"
end if

bueno el msgbox en el caso anterior solo se mostraria si el texto del text1 fuese Textualmente "hola" pero yo quiero que se muestre aunque sea "Hola", hOla", "hoLa", "holA" u "HOLA"; me explico?

Bueno, solo eso, como podria hacerlos... obviamente sin usar if or or or or then xP

Título: Re: [ayuda] Como hago para que HOLA = hola?
Publicado por: Karcrack en 11 Febrero 2010, 17:17 pm

Código

Option Compare Text

Ejemplo:

Código

Option Explicit
Option Compare Text
 
Private Sub Form_Load()
    If "Hola" = "HOLA" Then
        MsgBox "=)"
    End If
End Sub

Título: Re: [ayuda] Como hago para que HOLA = hola?
Publicado por: Dessa en 11 Febrero 2010, 17:39 pm

Hola, y con Lcase ?

If LCase$(Text1) = "hola" Then MsgBox "Hola!"

Título: Re: [ayuda] Como hago para que HOLA = hola?
Publicado por: agus0 en 11 Febrero 2010, 18:58 pm

Cita de: Dessa en 11 Febrero 2010, 17:39 pm

Hola, y con Lcase ?

If LCase$(Text1) = "hola" Then MsgBox "Hola!"

No del todo... por que Lcase Convierte todo a minusculas y si yo quiero hacer por ejemplo HoLa = HOla... no serviria

= no es mala la idea :P Gracias
a los 2

Título: Re: [Resuelto] Como hago para que HOLA = hola?
Publicado por: egrimm en 12 Febrero 2010, 11:48 am

Lo que quieres es comparar los caracteres sean mayuscula o minuscula?

Si es asi te recomiendo que pases caracter a caracter convirtiendolo a ascii si miras la tabla ascii veras que pasar de minusculas a mayusculas es cuestion de sumar y restar un numero.