调色板实现，如图，求教

VB如何实现下列效果？

--------------------编程问答--------------------         g.FillPie(br1, rect, 0, 360 * 15 / sum)

        g.FillPie(br2, rect, 0, 360 * 25 / sum)

        g.FillPie(br3, rect, 0, 360 * 20 / sum)

        g.FillPie(br4, rect, 0, 360 * 15 / sum)

        g.FillPie(br5, rect, 0, -360 * 15 / sum)

        g.FillPie(br6, rect, 0, -360 * 10 / sum)

第4个参数有问题，请教该如何写？ --------------------编程问答--------------------  Dim br1 As SolidBrush = New SolidBrush(Color.Green) --------------------编程问答-------------------- 坐标怎么标识的？ --------------------编程问答-------------------- Private Sub Command6_Click()
    FillStyle = 0
    FillColor = 255
    Circle (500, 500), 300, RGB(0, 0, 255), -3.14159 / 6, -3.1415926 / 3
    
    FillColor = &HFF0000
    Circle (500, 500), 300, &HFF0000, -3.14159 / 3 - 0.001, -3.1415926 / 3 * 2

End Sub --------------------编程问答-------------------- 将最后两个参数设置为负数 ，就能画出扇形，负数是关键

补充：VB ,  控件