IF avec TextBox

Bonjour

je ne sais pas si cela se fait, mais j'essaye de mettre une condition sur un textbox et je ne sais pas comment.

Merci pour toute aide

voici, ce que j'essaye de faire!

Private Sub TextBox5_Change()

If Val(TextBox5 + 100) < Val(TextBox4) Then

TextBox7.Value = "OK"

Else

TextBox7.Value = "Late"

End If

End Sub

Bonsoir Duplaly, bonsoir le forum,

Peut-être serait-il préférable d'utiliser la procédure AfterUpdate plutôt que Change, sinon ton code semble correct. Qu'est-ce qui te pose problème ?

Private Sub TextBox5_AfterUpdate()
If Val(TextBox5.Value) + 100 < Val(TextBox4.Value) Then
    TextBox7.Value = "OK"
Else
    TextBox7.Value = "Late"
End If
End Sub

Tout Fonctionne.

Merci