Gráfico Pizza

[pedrovisk 1]

Turma,

 

Alguém sabe como eu faço para exibe a quantidade (valor) no gráfico abaixo?

Esse valor deveria exibir ao lado da pizza.

 

 

Dim catnom(), valor(), caminho, categories, valuescaminho="C:\Inetpub\wwwroot\SisConTI\ImagensTemp"	categories = ""	values = ""			rs2.MoveFirst	Do While Not rs2.EOF		categories = categories & rs2.Fields(0).Value & Chr(9)		values = values & rs2.Fields(1).Value & Chr(9)		rs2.MoveNext	Loop	rs2.Close	' Remove the leftover tab character at the end of the strings.	categories = Left(categories, Len(categories) - 1)	values = Left(values, Len(values) - 1)With Server.CreateObject("OWC11.ChartSpace")	set c = .constants	With .charts.add		.HasTitle=True		if .HasTitle then			.Title.Caption = "Frutas Hoje"			.Title.Font.Size = 10			.Title.Font.Name = "Tahoma"			.Title.Font.Bold = True			.Title.Font.Italic = False			.Title.Font.Underline = False		end if				.HasLegend = True		if .HasLegend then			.Legend.Font.Size = 9			.Legend.Font.Name = "Tahoma"			.Legend.Font.Bold = False			.Legend.Font.Italic = False			.Legend.Font.Underline = False					end if			.Type = c.chChartTypePie		With .seriescollection.add			.caption = "Frutas"			.setdata c.chdimcategories,c.chdataliteral, categories			.setdata c.chdimvalues,c.chdataliteral, values			'.setdata c.chdimvalues,c.chdataliteral, "Amadeus"		End With	End With			'.border.color = c.chColorNone	Set arquivo=Server.CreateObject("Scripting.FileSystemObject")	arquivo=arquivo.GetTempname & ".gif"	.ExportPicture caminho&"/"& arquivo, "gif", 520, 500	Response.Write "<img src='/Sisconti/ImagensTemp/"&arquivo&"'>"End With

[pedrovisk 1]

Como eu faço para exibir a percentagem?

[woodstock 0]

pooo, porcentagem cara? aritmetica purase 80 = 100%27 = x%, então80x = 100 * 2780x = 2700x = 2700 / 80 x = 34,75portanto, 80 = 100%, 27 = 34,75% do totalou mais facil aindatotal * parte / 100 = %

[pedrovisk 1]

woodstock,Até aí beleza, disso eu sei, o pro é como colocar isso em um gráfico. Se nem o valor eu consigo exibir, como poderei inserir isso?O que eu quero saber é como eu coloco a linha para exibir os valores? Conforme imagem acima.

[Aninh@ 1]

desculpa resposta errada!!!!

[pedrovisk 1]

Alguém pode me ajudar?

[brunogatti 0]

Também tinha essa dúvida...pesquisei na documentação do OWC e achei isso aki.....tenta inserir isso no código do gráficowith .SeriesCollection(0).DataLabelsCollection.add .HasPercentage=True .HasValue=False .Font.Color = "Red" .Font.Size = 10 .Font.Bold = TrueEnd with