Dim pGeo As IGeometry
Set pGeo = [Shape]
Dim pPolyline As IPolylineDim pPol
阅读背景：
ArcMap计算PolyLine中点VBA
来源：互联网
分享到：
