Visual Basic para Aplicaciones - modificando valores

hola a todos pues explico un poco ya que soy bien novato en el tema , tengo un form atravez de una consulta con 4 textbox con el sgte codigo:

Private Sub TextCheque_AfterUpdate()
If [TextCheque] >= 0 Then
Me![TextSaldo].FontBold = True
Me![TextSaldo] = "$00.00"
Me![TextSaldo].ForeColor = vbRed
Exit Sub
Else
If [TextCheque].Enabled Then
Me![TextSaldo].FontBold = False
Me![TextSaldo] = "$30.00"
Me![TextSaldo].ForeColor = vbBlack
End If
End If
End Sub

bien el textbox (debe) = 30 (saldo) =30 cual es el objetivo que cuando introduzca un cheque el saldo quede en rojo y en 0.0 a la vez y viceversa cuando no ingrese nada necesito que aparezca el 30 en el saldo nuevamente.

lo que me sucede con este codigo es que cuando introduzco el # de cheque me pone en rojo el saldo y 0.0 el valor ,hasta ahi todo esta bien pero me convierte en rojo todos los textbox saldo ,lo que necesito es que me convierta solamente en rojo el saldo en cuestion (introducido cheque)y no los demas sin mas roque