Application VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Application
  4. Working with the Active Window
'To make sure that a window is open, check whether the Count property of the Windows collection is 0
Sub open()
    If Windows.Count = 0 Then MsgBox "There is no active window.", vbOkOnly + _
        vbExclamation, "No Window Is Open"
End Sub