hi im a newbie at vb, and i want to edit a textbox that have a defined value like a the coded value.below

Code:
Private Sub txtunits_GotFocus()
txtunits.Text = Format((Val(cbotimeto.Text) - Val(cbotimefrom.Text)) * (Val(chkMon.Value) + Val(chktues.Value) + Val(chkFri.Value) + Val(chksun.Value) + Val(chksat.Value) + Val(chkWed.Value) + Val(chkthurs.Value)), "0.00")
If txtunits.Text = "3.00" Then
MsgBox
...