起動している ArcGIS Desktop アプリケーションの取得

      2017/12/09

Public Sub GetRunningApplications()
    Dim pAppROT As IAppROT
    Set pAppROT = New AppROT
     
    Dim pApp As IApplication
    Set pApp = pAppROT.Item(1)
     
    Debug.Print pApp.hWnd
 
End Sub

 - プログラミング, ArcGIS , ,