如何在vb.net中使用arcobjects找到两个相交特征（圆弧和折线）的坐标？

Question

我是arcobjects的新手，我想找到圆弧和折线的交点的坐标。问题是我的代码显示没有交叉点，即使我知道有一个交叉点。代码是，

Dim circle1 As ESRI.ArcGIS.Geometry.ICircularArc = New ESRI.ArcGIS.Geometry.CircularArc()
circle1.PutCoordsByAngle(site, 0, 2 * PI, Dist1)
Dim obj1 As Object = Type.Missing
Dim segCollection1 As ISegmentCollection = TryCast(New Polylineclass(), ISegmentCollection)
segCollection1.AddSegment(DirectCast(circle1, ISegment), obj1, obj1)
Dim geom_circle1 As IGeometry = TryCast(segCollection1, IGeometry)
geom_circle1.SpatialReference = pGCS
Dim pGeom As IGeometry
        Dim pTopo As ITopologicalOperator3 = geom_circle1
        Dim pPoints As IPointCollection
If Not pTopo.IsSimple Then pTopo.Simplify()
        pGeom = pTopo.Intersect(pLine, esriGeometryDimension.esriGeometry0Dimension)
pPoints = pGeom

有人可以帮我吗？

由于