已知一个点和角度及长度可求出另一个点

Public Function PolarPoints(ByVal pPt As Point2d, ByVal dAng As Double, ByVal dDist As Double)
        Return New Point2d(pPt.X + dDist * Math.Cos(dAng), pPt.Y + dDist * Math.Sin(dAng))
    End Function
版权声明：本文为jingxuan84原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接和本声明。