Private Sub ClientName_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
lblClientNameHelp.Visible = True
End Sub
Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
lblClientNameHelp.Visible = False
End Sub