フィーチャ レイヤーに設定されているフィールドのエイリアス名を取得する方法

 2016/9/1 (木)    

Dim pOrderedLayerFields As IOrderedLayerFields
Set pOrderedLayerFields = pLayer
 
Dim pFieldInfoSet As IFieldInfoSet
Set pFieldInfoSet = pOrderedLayerFields.FieldInfos
 
Dim pFieldInfo As IFieldInfo
Set pFieldInfo = pFieldInfoSet.FieldInfo(0)
 
Debug.Print pFieldInfo.Alias

Copyright© WINGFIELD since1981 , 2018 All Rights Reserved.