Enter键清除文本框

Question

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As KeyPressEventArgs) Handles TextBox1.KeyPress

    If Asc(e.KeyChar) = Keys.Enter Then
        TextBox2.Focus()
    End If

End Sub

上面的代码是我移动到另一个文本框的代码一旦textbox1有一个值或者我应该说一旦我在textbox1中输入一个值并使用回车键它应该移动到TextBox2但是当你使用回车键时它发生了，textbox1值已被清除。我的文本框工具在MultiLine中，这就是它总是发生的原因。

Answer 1

请尝试使用KeyPress，而不是使用KeyDown事件，并在TextBox1_KeyDown的代码中输入以下内容

If e.Keys = Keys.Enter
    TextBox_2.Focus()
    e.Handled = true
End If