[Resuelto] Como hago para que HOLA = hola?

[agus0]

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 [Seleccionar] Expandir


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

[Karcrack]

Código (vb) [Seleccionar] Expandir

Option Compare Text

Ejemplo:

Código (vb) [Seleccionar] Expandir

Option Explicit
Option Compare Text

Private Sub Form_Load()
    If "Hola" = "HOLA" Then
        MsgBox "=)"
    End If
End Sub

[Dessa]

Hola, y con Lcase ?

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

[agus0]

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 Gracias
a los 2

[egrimm]

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.