Polyline の M 値から Point を取得

 2016/9/1 (木)    

Dim pPolyline As IPolyline
Set pPolyline = pFeature.Shape
 
Dim pPoint As IPoint
Set pPoint = New Point
pPolyline.QueryPoint esriNoExtension, 0.11, False, pPoint
 
Debug.Print pPoint.X, pPoint.Y

Copyright© WINGFIELD since1981 , 2018 All Rights Reserved.