明文后用RichTextBox设置SetCaretPos

Question

我有一个RichTextBox，启用了多行并启用了v滚动条。我在这里遇到一个小问题，当我按下输入它显示我输入的文本并且它清除但由于某种原因Caret位置停留在第二行所以我必须向上移动..我怎么能在开始时设置Caret我清楚文字后？

Answer 1

您没有共享任何代码，因此我的猜测是您正在清除KeyDown事件中的文本。

只需将e.SuppressKeyPress值设置为true：

Private Sub RichTextBox1_KeyDown(sender As Object, e As KeyEventArgs) _
                                 Handles RichTextBox1.KeyDown
  If e.KeyCode = Keys.Enter Then
    RichTextBox1.Clear()
    e.SuppressKeyPress = True
  End If
End Sub