在VB6.0语言中，控件缺少一些事件，比如菜单条缺少mousemove事件，而toolbar也缺少mouseenter控件，怎么扩展这些事件呢？
可以用setwindowlong来实现子类化，拦截对应的 windows 消息来处理。