Visible property example

The following example demonstrates how to change the value of the Visible property.

Private Sub VisiblePropExample()

     Application.Visible = False

     MsgBox "Visible property is now false. Click OK to restore."

     Application.Visible = True

     End

End Sub