Hola!!
Yo limpio los Textboxes pasando EMPTY en vez de " ". Asi: txtDatos.Text=Empty
Intenta tu CODE asi:
Código vb:
Ver originalPrivate Sub cmd_Click()
txt.Text = Empty
End Sub
Private Sub txt_Change()
If txt.Text = Empty Then Exit Sub
txt2.Text = txt.Text * 5
End Sub