Калькулятор в Microsoft Visual Basic

[nika1]

Здравствуйте.Подскажите пожалуйста куда я должна дописать tb.BackColor = RGB(255, 0, 0), чтобы в калькуляторе при делении на 0 окно с 0 становилось красным.

Private Sub ok_Click()
Dim a As Double, b As Double, res As Variant
If IsNumeric(ta) And IsNumeric(tb) Then
a = ta
b = tb
If obs = True Then res = a + b
If obp = True Then res = a * b
If obr = True Then res = a - b
If obd = True Then
    If b = 0 Then MsgBox "Делить на 0 нельзя!": res = "Делить нельзя" Else: res = a / b
    End If
 If obk = True Then
If a + b >= 0 Then res = Sqr(a + b) Else res = "Сумма отрицательна"
End If
 otv = res
Else: MsgBox "Введите a и b"
End If
End Sub