:326.453KB : :1 :2020-09-10 16:42:22
d = 求平方根 (求次方 (半径, 2) + 求次方 (半径, 2))
pt.x = 圆心坐标.x - 半径
pt.y = 圆心坐标.y - 半径
矩形 = 制矩形F (pt.x, pt.y, 2 × 半径, 2 × 半径)
' GdipCreatePen1 (颜色, 1, 0, pen)
' GdipSetPenDashArray (pen, { 4.5, 4 }, 2) ' 定义虚线格式
brush.创建 (颜色)
GdipFillEllipseI (图形指针, brush.取指针 (), pt.x, pt.y, 2 × 半径, 2 × 半径)
' GdipDrawEllipseI (绘画数据.mGraphics, pen, pt.x, pt.y, 2 × 半径, 2 × 半径)
' GdipDeletePen (pen)