テキストボックス内でEnterによる改行するには？ (ID:78592)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 win2k vb6.0 テキストボックスで複数行入力したい為にMultiLine プロパティを 設定してCtrl+Enterで改行できるのですが、Enterのみで改行させたい為、 下記のコードでEnterを押したのですが入力した文字が下がりうまく 改行できません。ご教授よろしくお願いします。 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Text1.Text = Text1.Text & vbCrLf End If End Sub