hi guys'
i'm trying to get a different color for each range of values calculated on my calculator,

Code:
 Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        'calculate fome precentage, write to text box 3

        Dim intdry As Double
        Dim intwet As Double
        Dim intfoam As Double



        intdry = (Val(dry.Text))
...