谁帮助俺解决对您来说是小,对我来说是大的问题!

moleboy 2001-12-01 08:16:45
Form 的 LostFocus和GotFocus事件本应是当窗体被点中时发生GotFocus事件,
当窗体不被激活时发生LostFocus事件!
但我的窗体不管激活还是不激活都不发生上述两个事件!
就是启动时发生了GotFocus事件后,如果此时我选别的文件夹窗口,则原来被激活的窗口应该变灰!发生LostFocus 事件,但我的程序却不发生LostFocus 事件!如果在窗体加上其他部件如按钮!则上述两个事件都不发生!如何解决!

Private Sub Form_GotFocus()
MsgBox "1"
Image1.Picture = Image3.Picture
End Sub
Private Sub Form_LostFocus()
Image1.Picture = Image3.Picture
MsgBox "2"
End Sub

...全文
130 7 打赏 收藏 转发到动态 举报
写回复
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
Amoon 2001-12-02
  • 打赏
  • 举报
回复
:),如果你的工程中有多个窗体,就可以用GotFocus、LostFocus 了。但是只限于当前线程中的窗体。
如果你要在选中其他程序的窗体时LostFocus就不能用了,GotFocus也是如此。
办法就是子类化你要处理的窗体,截获消息WM_ACTIVATE根据他的参数wParam的值可判断是获取了焦点,还是失去了焦点。
飞天神笔 2001-12-02
  • 打赏
  • 举报
回复
你有没有什么特殊的其他控件?以前我用Cell控件时就发生类似情况。
jacklondon 2001-12-01
  • 打赏
  • 举报
回复
这个事件只是在你自己用到多个FORM时才可以用。可以用Form_Activate(),Form_Deactivate()
ozarkgirl 2001-12-01
  • 打赏
  • 举报
回复
我在win98下运行编译好的vb程序,可他说“类未注册。查找对象,其CLSID为"{>00000010-0000-0010-8000-00AA006D2EA4}”还说“运行时错误713':类未注册。查找对象,其CLSID为"{>00000010-0000-0010-8000-00AA006D2EA4}”请大家帮忙看看,急,急,急
langzhi 2001-12-01
  • 打赏
  • 举报
回复
关注
Bardo 2001-12-01
  • 打赏
  • 举报
回复
Private Sub Form_Activate()

End Sub

Private Sub Form_Deactivate()

End Sub
相关推荐

7,703

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告