The following example illustrates using the WindowChanged event with an Application
object. To use the WindowChanged event with a Document or Workspace object,
you do not need to initialize the App variable.
Public WithEvents App As Application
'To receive and handle events from
progeCAD, first initialize the App variable.
Set App = ThisWorkspace.Application
Private Sub App_WindowChanged(WindowState)
' This example receives an Application
' This event occurs when a change
is made to the state of an application, document, or workspace window.
' To fire this event:
' 1) Run init() function to initialize
' 2) Restore, minimize, or maximize
MsgBox "The state of a window