The following example illustrates using the BeginCommand event with an Application
object. To use the BeginCommand 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_BeginCommand(CommandName)
' This example receives an Application
' This event occurs immediately
after a command is called.
' To fire this event:
' 1) Run init() function to initialize
' 2) Call a command.
MsgBox "A command was just