首页 > 解决方案 > 将鼠标悬停在表单按钮上时如何添加评论?

问题描述

我正在尝试添加当鼠标悬停在表单按钮上时出现的评论,但一旦您停止指向该按钮就会消失。我该如何做到这一点?

我尝试在属性表菜单的另一个选项卡中添加注释,但它没有完成我想做的事情。任何解释如何执行此操作的详细说明都会很棒。

标签: ms-accessbuttoncommand

解决方案


您可以使用MouseMove按钮的事件和周围的表单部分(可能是表单详细信息)来完成此操作。

在下面的示例中,当鼠标在按钮和表单详细信息部分之间移动时,标签的可见性被切换:

在此处输入图像描述

以上由以下两个事件处理程序驱动:

Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If MyComment.Visible Then MyComment.Visible = False
End Sub
Private Sub MyButton_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Not MyComment.Visible Then MyComment.Visible = True
End Sub

在这里,按钮被命名MyButton,包含评论的标签被命名MyComment


推荐阅读