关于mousemove事件
高手请进：我想实现这样一个功能，当鼠标移动到工具条的任何一个按钮时，状态栏就会显示相应的操作信息，该怎样实现？请帮忙，谢谢！
[解决办法]
状态栏=object.ToolTipText
[解决办法]
在各个按钮的Tag属性里设置你想显示的工具按钮的操作信息，然后在Toolbar控件的MouseMove事件中添加如下代码：
dim n as Integer
n = x \ Toolbar1.ButtonWidth + 1
If n <= Toolbar1.Buttons.Count Then Check1.Caption = Toolbar1.Buttons(n).Tag
另外应该注意你窗体的缩放模式，即窗体的ScaleMode属性，如果为1 - Twip 则上面的代码没问题，如果不是1，还需要作些修改，例如如果是3 - Pixel 则n应该等于
x \ Toolbar1.ButtonWidth\Screen.TwipsPerPixelX + 1
[解决办法]
当然直接 让Check1.Caption = Toolbar1.Buttons(n).ToolTipText 也可以
PS: Check1.Caption是我随便找了个东西显示用的。
