Vb6 Visual Basic突出显示标签

Vb6 Visual Basic突出显示标签,vb6,Vb6,我是一名Visual Basic 6.0程序员,我想知道如果鼠标指向标签或鼠标悬停在标签上,是否可以在标签上突出显示,如果鼠标未指向标签或鼠标悬停在标签上,则突出显示将被删除???将ToolTipText属性设置为鼠标悬停时要显示的文本。我相信这就是您所追求的:)。您可以使用标签的MouseMove事件来突出显示标签,并使用周围区域(例如表单本身)的MouseMove事件来删除突出显示 '1 form with ' 1 label: name=Label1 Option Explicit P

我是一名Visual Basic 6.0程序员,我想知道如果鼠标指向标签或鼠标悬停在标签上,是否可以在标签上突出显示,如果鼠标未指向标签或鼠标悬停在标签上,则突出显示将被删除???

ToolTipText
属性设置为鼠标悬停时要显示的文本。我相信这就是您所追求的:)。

您可以使用标签的MouseMove事件来突出显示标签,并使用周围区域(例如表单本身)的MouseMove事件来删除突出显示

'1 form with
'  1 label: name=Label1
Option Explicit

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  HighlightLabel False
End Sub

Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  HighlightLabel True
End Sub

Private Sub HighlightLabel(blnHighlight As Boolean)
  Label1.FontBold = blnHighlight
  Label1.FontItalic = blnHighlight
End Sub

答案可能是肯定的。请不要误用标签字段。答案的一半。当鼠标离开控件时,您还需要将它们设置回False。对不起,您是对的。我错过了那部分。我改变了答案。