>Eric,
>
> Actually what i mean is when i key in each month first time in text1, the text2 automatically call "0" and for the second and following time the text2 will call the last balance. Please advise. Thank you.

Use this:

Private Sub Text1_Change()
    Text2.Text = "0"
End Sub