请教一个VB的编程问题，急急急！！

来源：百度知道 编辑：UC知道 时间：2024/05/23 00:57:49
在窗体中间画一个以1cm为半径的圆，然后在这个圆外相距1cm的一周，再画一圈同样的圆
不是画同心圆。是在中间得圆的周围再画一圈一样的呀

Private Sub Form_Click()
Dim CX, CY, Radius, Limit ' Declare variable.
ScaleMode = 7 ' 以厘米为单位。
CX = ScaleWidth / 2 ' X 位置。
CY = ScaleHeight / 2 ' Y 位置。
Circle (CX, CY), 1, RGB(Rnd * 255, Rnd * 255, Rnd * 255)
Circle (CX, CY), 2, RGB(Rnd * 255, Rnd * 255, Rnd * 255)
End Sub

不错，有知道了一个属性的作用