I am using (LineElement.)getIntersectionPoints method to find the number of intersection points between two specific line elements. In some case, there is no intersection between the lines. But the getintersectionPoints method returns a intersection point. Sample DGN is attached and the sample code is given below for your reference. How to solve this issue?
Option Explicit
Public Sub test() Dim eleEn As ElementEnumerator Dim ele1 As LineElement Dim ele2 As LineElement Dim intersectPts() As Point3d Set eleEn = ActiveModelReference.GetSelectedElements eleEn.MoveNext Set ele1 = eleEn.Current eleEn.MoveNext Set ele2 = eleEn.Current intersectPts = ele1.GetIntersectionPoints(ele2, Matrix3dIdentity) Debug.Print UBound(intersectPts)End Sub