CAD 获取两点之间的距离

  ''' <summary>
        ''' 获取两点之间的距离
        ''' </summary>
        ''' <param name="Point1">点1</param>
        ''' <param name="Point2">点2</param>
        ''' <returns></returns>
        Public Shared Function GetDistanceBetweenTwoPoint(Point1 As Point3d, Point2 As Point3d) As Double
            Return Math.Sqrt((Point1.X - Point2.X) ^ 2 + (Point1.Y - Point2.Y) ^ 2 + (Point1.Z - Point2.Z) ^ 2)
        End Function