VB 失去焦点时验证事件没有引发
发布时间:2020-12-17 08:17:05 所属栏目:百科 来源:网络整理
导读:Private Sub Form_Load() Form1.KeyPreview = True '控件前拦截按键激活 Text1.CausesValidation = True '激活使之可以引发验证事件End SubPrivate Sub Command1_Click() Text2.SetFocus '转移焦点到文本2End SubPrivate Sub Form_KeyDown(KeyCode As Intege
Private Sub Form_Load() Form1.KeyPreview = True '控件前拦截按键激活 Text1.CausesValidation = True '激活使之可以引发验证事件 End Sub Private Sub Command1_Click() Text2.SetFocus '转移焦点到文本2 End Sub Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Text2.SetFocus '窗体接收任意键盘,转移焦点 End Sub Private Sub Text1_Validate(Cancel As Boolean) MsgBox "文本1失去焦点前验证" End Sub
点击命令可以激活 鼠标点击,可以激活 TAb可以激活 但其它按键时,在失去焦点时,却没有引发,原因不明。 (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |
相关内容