keypress事件 发出 “噔”的声音该如何解决

keypress事件 发出 “噔”的声音该如何解决 keypress事件 发出 “噔”的声音, Private Sub PressEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress, TextBox2.KeyPress, TextBox3.KeyPress Dim sk As Microsoft.VisualBasic.Devices.Keyboard = My.Computer.Keyboard If e.KeyChar = ChrW(Keys.Enter) Then sk.SendKeys( {TAB} ) End If End Sub 每次输入后回车，就会发出“噔”的系统声音，还影响运行速度，不知道为什么。。。 第二个问题:在Btn1上按回车后，焦点还在Btn1上面 如果把TextBox1.Focus()放在Click事件里面，就不能判断e.KeyChar Private Sub Btn1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Btn1.KeyPress If e.KeyChar = ChrW(Keys.Enter) Then TextBox1.Focus() End Sub ------解决-------------------------------------------------------- Private Sub PressEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress, TextBox2.KeyPress, TextBox3.KeyPress Dim sk As Microsoft.VisualBasic.Devices.Keyboard = My.Computer.Keyboard If e.KeyChar = ChrW(Keys.Enter) Then sk.SendKeys( {TAB} ) e.Handled = True End If End Sub