スタンドアロン テーブルにアクセスする方法

投稿日:2016/9/1 (木) 更新日:

Public Sub Access2StandaloneTable()
    Dim pMxDocument As IMxDocument
    Set pMxDocument = ThisDocument
     
    Dim pStandaloneTableCollection As IStandaloneTableCollection
    Set pStandaloneTableCollection = pMxDocument.FocusMap
     
    Dim pStandaloneTable As IStandaloneTable
    Set pStandaloneTable = pStandaloneTableCollection.StandaloneTable(0)
 
    Dim pTable As ITable
    Set pTable = pStandaloneTable.Table
End Sub

関連記事

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

Copyright© WINGFIELD since1981 , 2018 All Rights Reserved.