GotFocus Event Example

This example displays a message when the focus moves to CheckBox1.

Private Sub CheckBox1_GotFocus()
    Msgbox "Check this box if you are a permanent employee."
End Sub