GetPointAt方法示例
2015-12-15 22:24:36 来源: 评论:0 点击:
对于
对象Polygon1,下列示例获得点索引2处的点对象。Dim iPoint As Object Dim dX as double Dim dY as double Set iPoint = Polygon1 GetPointAt(2) dX = iPoint x dY = iPoint y
对于 对象Polygon1,下列示例获得点索引2处的点对象。
Dim iPoint As Object
Dim dX as double
Dim dY as double
Set iPoint = Polygon1.GetPointAt(2)
dX = iPoint.x
dY = iPoint.y