如何实现鼠标指针移动到按钮上就会显示该按钮的名字

Question

如何实现鼠标指针移动到按钮上就会显示该按钮的名字谢谢

Answer 1

属性里有tooltiptext，不知道符合你的要求不？

Answer 2

为什么响应了CLICK事件后
再把鼠标移到按钮上就不显示了按钮的名字了??

Answer 3

用ToolTopText就可以
没发现LZ说的问题

Answer 4

可能你不会写 2F 所说的 ToolTipText ?Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
   Command1.ToolTipText = Command1.Caption
End Sub再怎么点击Command1 这个Tooltiptext也不会消失, 除非你在Command1_Click事件中把Command1.caption改掉了.

Answer 5

谢谢CBM666,我不是COMMAND控件做按钮,我是用IMAGE控件做按钮
代码是这样的
Private Sub OpenFile_Click()
OpenFile.ToolTipText = 打开文件
On Error GoTo errhandler
CommonDialog1.Filter = "所有文件(*.*)|*.*|位图文件(*.bmp)|*.bmp|jpeg文件(*.jpeg)|*.jpeg|"
CommonDialog1.FilterIndex = 2
CommonDialog1.ShowOpen
errhandler:
Exit Sub
End Sub
没响应事件能显示按钮的名字,响应了就不行了

Answer 6

OpenFile.ToolTipText ="打开文件"