请问个圆饼图的有关问题，指示不对

请教个圆饼图的问题，指示不对
p1 = Double(XValue[1])
p2 = Double(XValue[2])
p0 = p1+p2
p1 = Round(p1/p0*100,2)
p2 = Round(100 - p1,2)
gr_1.AddSeries("A")
gr_1.AddSeries("B")
gr_1.AddData(1,p1,'A')
gr_1.AddData(1,p2,'B')








------解决方案--------------------
这个分给我吧，我都没可用分了，yyoinge那张贴的分给你了