>>844
Text1.Text = ""
の直後に
KeyAscii = 0
を入れるべし。

今の状態だとText1を空にした後、Enterキーの入力がText1に入るので、
改行された状態になる。