VB2005《KeyPress》事件

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后,表示此事件已处理,便不会再将它发送到操作系统消息队列进行默认处理,也就没声了吧。

本文发布于:2024-09-24 09:22:05,感谢您对本站的认可!

本文链接:https://www.17tex.com/tex/4/154640.html

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系,我们将在24小时内删除。

标签:处理   默认   文本框
留言与评论(共有 0 条评论)
   
验证码:
Copyright ©2019-2024 Comsenz Inc.Powered by © 易纺专利技术学习网 豫ICP备2022007602号 豫公网安备41160202000603 站长QQ:729038198 关于我们 投诉建议