
LostFocus 事件
此事件是在一个对象失去焦点时发生,焦点的丢失或者是zhidao由于制回表键移动或单击另一个对象 *** 作的结果,或者是代码中使用 SetFocus 方法改变焦点的结果。
用户的代码的意思是,在Text1失去焦点的时候,判断Text1输入的数字是否在1和100之间,如果不是权则发出警告音并在窗口输出“重新输入”,同时Text1内容清空并重新获得焦点等待正确的输入;否则就输出正确的数字。
扩展资料:
VB中有一个LostFocus事件和一个GotFocus事件,看名字似乎是当当前窗口失去焦点或得到焦点时触发的事件。但在实际应用时却发现当这个窗口和Windows中其他窗口进行切换时并没有触发这两个事件,现在解析一下这两个事件。
Form_LostFocus、Form_GotFocus是指的是一个MDI主父窗体调用了多个子窗体,当这些子窗体之间切换时,就触发这两个事件;当一个窗体中的多个文本框,鼠标点击另一个文本框时,也会触发这两个此事件,文本框在 Windows内部实际上也是一个窗口。
Windows内部是通过消息来触发事件的,这两个事件在Windows内部对应的消息是WM_NCACTIVATE,当该消息的wParam为0时表示是失去焦点,为非0时表示得到焦点。
退出按钮的CausesValidation设为falsePrivate Sub Text1_Validate(Cancel As Boolean)
If Val(Text1.Text) <0 Then
Form2.Show 1
End If
End Sub
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)