Sample Code 1

Code in Visual Basic form FormError.

'FormError

Option Explicit

Private Sub Command1_Click()

    Unload Me

End Sub

Sample Code 2