Foro de elhacker.net

hola
tengo un poblema con el formato condicional cuando los numeros son en porcentajes. y no se si el signo del porcentaje % influye en el numero que escribo en el textbox por ejemplo tengo

textbox1 con el valor 99% quiero que valores menores o igual que el 99% el texbox cambien a color verder y mayores del 99% a rojo

este es el codigo que he usado pero con numeros normales sin el signo del porcentaje%


pero si escribo el numero + el signo del porcentaje no entiene el codigo que se trata de un numero tbm.

bueno espero que alguien sepa por q pasa gracias :D

Lo solucionas asignando val al text1 para identificarlo como un numero

Private Sub Text1_Change()
    If Val(Text1.Text) <= 99 Then
        Text1.BackColor = vbGreen
    ElseIf Val(Text1.Text) > 99 Then
        Text1.BackColor = vbRed
    End If
End Sub
 

 
Private Sub Text1_Change()
    with Text1
        If Val(.Text) <= 99 Then
            .BackColor = vbGreen
        Else
            .BackColor = vbRed
        End If
    end with
End Sub
 
 

Val no identificada nada. Val hace una conversion string a Double


P.D.:  elseIf Val(Text1.Text) > 99 Then  se Obvia y se deja else !¡.

Dulce Infierno Lunar!¡.

gracias eso estaba buscando gracias por las respuestas