Private Sub txtID_MouseEnter(sender As Object, e As EventArgs) Handles txtID.MouseEnter
txtID.BackColor = Color.Yellow
txtID.ForeColor = Color.Black
End Sub
Private Sub Form1_MouseLeave(sender As Object, e As EventArgs) Handles Me.MouseLeave
txtID.BackColor = Color.Gray
txtID.ForeColor = Color.Black
End Sub