Online sammetælling af indtastede værdier i et tekstfelt i UserForm

Her er et eks. med 3 tekstbokse, som summeres i tekstboks 4.
Personligt ville jeg lave TextBox4 som en Label istedet for, eller sætte TextBox4.Enabled = False så der ikke kan skrives i sum boksen.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    NulStreng
    TextBox4 = CStr(CDbl(TextBox1.Value) + CDbl(TextBox2.Value) + CDbl(TextBox3.Value))
End Sub

Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    NulStreng
    TextBox4 = CStr(CDbl(TextBox1) + CDbl(TextBox2) + CDbl(TextBox3))
End Sub

Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    NulStreng
    TextBox4 = CStr(CDbl(TextBox1) + CDbl(TextBox2) + CDbl(TextBox3))
End Sub

Private Sub NulStreng()
    If TextBox1 = \"\" Then TextBox1 = \"0\"
    If TextBox2 = \"\" Then TextBox2 = \"0\"
    If TextBox3 = \"\" Then TextBox3 = \"0\"
End Sub

1.000 tak for hjælpen !

Nu virker den :-)