直接畫圓當然是交叉啦
'畫大圓
FillStyle = 4
FillColor = vbBlue
Circle (ScaleWidth / 2, ScaleHeight / 2), ScaleHeight / 8, vbBlue
'清除/填空
FillStyle = 0
FillColor = BackColor
Circle (ScaleWidth / 2, ScaleHeight / 2), ScaleHeight / 12, BackColor
'畫小圓
FillStyle = 5
FillColor = vbRed
Circle (ScaleWidth / 2, ScaleHeight / 2), ScaleHeight / 12, vbRed
--
VB 程式設計 倉木麻衣 PTT 星爺板 行列輸入法
======================================================
Visual_Basic MaiKuraki Stephen Array
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.222.155.162