Advertisement
2002VB Miscellaneous #17874

A HIGHLIGHTED LABEL

This code was publshed before, but this is a much simpler way. This code is very cool! When you move a mouse over a label, the text lights up! When you move your mouse off of the label, the text turns back to its original color. VERY COOL, VERY EASY!

AI

Resumen de IA: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Código fuente
original-source
'Put this into the Form_MouseMove.
 Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
 Label1.ForeColor = &H80000012&
 End Sub
'Ok, now stick this part into your Labels Label1_MouseMove
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
 Label1.ForeColor = &H000000FF&
End Sub
Comentarios originales (3)
Recuperado de Wayback Machine