Question

VB菜单MouseMove

VB中菜单控件只有个Click事件，没有MouseMove，但我想让鼠标移动到菜单上时，程序的状态栏能显示提示文本（比如鼠标移到“新建”菜单上，状态栏上显示“新建一个项目”）。这个功能绝对可以实现，至少微软的程序都这样！去年提问了这么个问题，没有分，没人回答……唉！我听说鼠标钩子可以实现这功能，具体代码怎么玩？大虾帮忙……谢谢。

Answer 1

用这个控件吧"Actbar2".对制作菜单很好用

以前我有找过个类似的代码一时想不起来了,你那个要求是可以实现的.你找找"VB制作Office菜单之类的",可以参考.

追问

Actbar2怎么用呢，能否给点提示啊，还有，点击“（自定义）”时，VB说类未正确注册，这又是怎么回事啊。

追答

Actbar2 开发时安装此控件的相关软件一下,在VB中添加进去,就可以操作了,具体我记不太清楚了6年前用他做过仿制的word,PowerPoint,菜单几乎一样.

使用时,类未正确注册 你就Shell ("regsvr32 /s Actbar2.OCX")

Answer 2

菜单是不能用mousemove事件的。
但你可以在编辑菜单的编辑器里找到一个“Tip” （提示） 属性。
在里面输入 “新建一个项目” 即可在鼠标停顿时，出现你需要的提示了。

追问

找不到你说的那个“Tip”属性啊~是标准的菜单~没那个属性~

追答

你用的是第几代的vb ?

追问

VB6.0——OUT了，但我不想升级

追答

vb 6.0 这个版本是 98 年发布的。 其实很老了。
我看过，就是win7的标准附件程序 里面的菜单也是没有提示功能的。
就是说，vb6.0 的版本根本就没有考虑过这个问题，所以也不能用他预设的菜单编辑器实现这个功能。
如果你真要的话，可能vb 2010好些。
如果用 vb6.0 的话，就得自己用　label 控件来自己设计的菜单了。否则用不到这种功能的。

还是解决不了，真不好意思了。呵呵

追问

不管怎样还是谢谢你了，我这问题刚提问，再等几天，没人回答就把分给你。

追答

呵呵,好的, 希望你能找到答案