以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  控件离开事件的细节处理  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=63621)

--  作者:lsy
--  发布时间:2015/1/25 11:09:00
--  控件离开事件的细节处理
登录窗口,常用无边框窗口,就是没有关闭按钮,要自己另外做一个。

用户名录入框,需要对录入内容进行控制:不能为空,不能是不存在的用户名,不能是尚未赋予权限的用户名,也不能是已停用的用户名。

为了能及时提醒并限制用户的操作,可选以下三个控件离开事件来判断并提醒,不符合规定,就不允许离开控件:

ValueChanged、Leave、Validating

问题在于,点击自制的关闭按钮,同样先触发以上事件,导致窗口无法关闭。

在这三个事件中,加一个判断,就解决了这个矛盾:

If e.Form.ActiveControl IsNot Nothing AndAlso e.Form.ActiveControl.Name = "btn-取消" Then
    Return
End If

--  作者:有点甜
--  发布时间:2015/1/25 11:22:00
--  

嗯嗯,不错的技巧