DesktopChart
Code:
Var colors() As ColorGroup = Array(new colorgroup(&c77c0e8, color.red), new ColorGroup(&c261174, color.orange), new colorGroup(&c399c86, color.yellow), new colorgroup(&cd4c364, color.white), new colorgroup(&c982c86, color.Purple), new ColorGroup(&c146726, color.blue), new ColorGroup(&c868927, color.gray))
Chart1.Title = “”
Chart1.Mode = DesktopChart.modes.bar
Chart1.GridColor = Color.Clear
Chart1.TitleFontName = FontNameDefault
Chart1.TitleFontSize = FontSizeDefault
Var data2() As Double = Array(RetornaValor(pwin1.Text),RetornaValor(pwin2.Text), RetornaValor(pwin3.Text), RetornaValor(pwin4.Text), RetornaValor(pwin5.Text), RetornaValor(pwin6.Text), RetornaValor(pwin7.Text), RetornaValor(pwin8.Text))
Chart1.AddLabels Array(“Metrics”, “Economic Buyer”, “Decision Criteria”, “Decision Process”, “Paper Process”, “Value Drivers”, “Champios”, “Competition”)
Var mySet As New ChartLinearDataset(“Graphic”, Color.Blue, True, data2)
mySet.ChartType = ChartLinearDataset.ChartTypes.bar
Chart1.AddDatasets(mySet)

