- 博客(2)
- 收藏
- 关注
RSS订阅原创 revit开发之判断两条直线是否平行
Public Shared Function IsParallelLine(ByVal curve1 As Curve, ByVal curve2 As Curve) As Boolean If curve1.GetType.ToString <> curve2.GetType.ToString Then Return False End If If TypeOf curve1 Is Line Then ..
2021-05-18 16:37:49
410
原创 revit开发之获取两直线的交点
revit开发之获取两直线的交点 Private Shared Sub GetIntersectPoint(ln As Line, l As Line, ByRef intPoint As XYZ) Dim intersectArray As New IntersectionResultArray ln.Intersect(l, intersectArray) If intersectArray IsNot Nothing Then
2021-04-01 10:07:55
568
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人