Question

VB6.0中如何对一个圆进行根据角度进行划分？。。然后涂上不同的颜色。。

我想做一个数据统计。。然后绘制成图。。就是一个圆，X占百分之几，Y占百分之几，Z占百分之几这样。。如何实现。。

Answer 1

用Circle方法（颜色可空着，用默认的前景颜色绘图）：
对象名.Circle（x，y）,半径,[颜色],起始角,终止角

起始角和终止角均为负值时，画一个扇形，起始角和终止角都是弧度，不是60°，70°这样的角度，你按照自己的百分比将0到2*3.14159的弧度划分好就可以了。

要填充的话，在画【每个扇形】之前，用两个语句（窗体的对象名直接用Me）：
对象名.FillStyle = 0
对象名.FillColor = 颜色值

第一行的0表示实心填充，第二行的颜色值可用RGB(i,j,k)或QBcolor(n)来赋值。

比如以下语句，就是画两个相邻的扇形，一个红色填充，一个黄色填充：

Me.Scale (-100, 100)-(100, -100)
Me.FillStyle = 0
Me.FillColor = RGB(255, 0, 0)
Circle (0, 0), 50, , -1.2, -1.7
Me.FillStyle = 0
Me.FillColor = RGB(255, 255, 0)
Circle (0, 0), 50, , -1.7, -2.7

Answer 2

自己画圆

Circle (0, 0), r, color

然后自己画线,根据百分比和圆心计算好线段的终点
从圆心画几条线过去就行了