VB2005《KeyPress》事件
Private Sub TexYHXM_KeyPress(KeyAscii As Integer) '如果在用户姓名文本框中按下任意键时拆除工具
If KeyAscii = 13 Then '如果按下的键是回车键
KeyAscii = 0 '不要发出Beep(嘣)声
tvline
TexYHMM.SetFocus'用户密码文本框得到焦点
End If不倒翁玩具
g蛋End Sub
Private Sub TexYHXM_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TexYHXM.KeyPress If e.KeyChar = ChrW(13) Then'如果按下的键是回车键
办公桌隔断关键就是如何不让计算机发出Beep(嘣)声
TexYHMM.Select()'用户密码文本框得到焦点
End If
End Sub
Private Sub texyhxm_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles texyhxm.KeyPress If e.KeyChar = Microsoft.VisualBasic.ChrW(13) Then
texyhmm.Focus()
e.Handled = True
End If
End Sub
你的代码If e.KeyChar = ChrW(13) Then'如果按下的键是回车键
wifi功率放大器TexYHMM.Select()
End If
执行完TexYHMM.Select()后,Handled属性的值仍为false,即未处理事件,则会将它发送到操作系统进行默认处理,这里可能操作系统默认就是来一个Beep(嘣)声作为KeyPress 事件的处理标志。 If e.KeyChar = ChrW(13) Then'如果按下的键是回车键
TexYHMM.Select()
e.Handled = True
End If
Handled属性的值设置为true后,表示此事件已处理,便不会再将它发送到操作系统消息队列进行默认处理,也就没声了吧。