[اسامه الهرماوي]

وعليكم السلام...
تفضل:

كود :

If val(TextBox1.Text) >= val(5) Then
TextBox1.ForeColor = Color.Green
Else
TextBox1.ForeColor = Color.Red
End If