1 2 3 4 5 | Private Sub Label5_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label5.MouseLeave Label5.ForeColor = Color.Blue End Sub |
1 2 3 4 5 | Private Sub Label5_MouseMove(sender As Object, e As MouseEventArgs) Handles Label5.MouseMove Label5.ForeColor = Color.Orange End Sub |
沒有留言:
張貼留言