如何在vba中的userform中为标签创建弹出式解释

Question

我正在寻找这个功能：“当用户暂停（不点击）光标在”userform“中的”标签“上时，会弹出一个小解释窗口（VBA）。”

我感谢任何帮助。

新浪

Answer 1

最简单的方法是设置标签的ControlTipText属性。

Answer 2

实际上这很简单，但它可以用作msgbox，而不是工具提示文本。有了这个清楚，让我们说你的标签被称为＆＃34; Label1＆＃34;并且它在一个表单中，你只需双击它，然后使用＆＃34; MouseMove＆＃34;事件而不是＆＃34;点击＆＃34; event，这是代码如何运行的一个例子：

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

MsgBox "message"

End Sub

告诉我它是怎么回事，希望它对你有帮助！