Mega Code Archive

 
Categories / VisualBasic Script / Forms
 

Using the Show Method to Display a Form

Sub SimpleFormExample()      ShowSimpleForm True      MsgBox "OK - Same form now, but modeless.", vbOKOnly      ShowSimpleForm False      MsgBox "Exiting the SimpleFormExample procedure.", vbOKOnly  End Sub  Private Sub ShowSimpleForm(bModal As Boolean)      If bModal Then          frmSimpleForm.Show vbModal      Else          frmSimpleForm.Show vbModeless      End If  End Sub