как показать текст метки («Сумма счета-фактуры», «Сумма времени», «Сумма счета») на диаграмме внизу или справа, у этого изображения есть код результата, это мой код. пожалуйста, помогите
Dim yValues As Double() = {100, 200, 300} ' Getting values from Textboxes
Dim xValues As String() = {"Invoice Amount", "Time Amount", "Bill Amount"} ' Headings
Dim seriesName As String = Nothing
ChartDemography.Series.Clear()
ChartDemography.Titles.Clear()
seriesName = "ChartInv"
ChartDemography.Series.Add(seriesName)
ChartDemography.Series(seriesName).Points.DataBindXY(xValues, yValues)
Dim CArea As ChartArea = ChartDemography.ChartAreas(0)
CArea.Area3DStyle.Enable3D = True
' Define Chart Type
ChartDemography.Series(seriesName).ChartType = SeriesChartType.Pie
ChartDemography.ChartAreas("Demography_ChartArea").Area3DStyle.Enable3D = True
Me.ChartDemography.ChartAreas("Demography_ChartArea").AxisX.Interval = 1
Me.ChartDemography.ChartAreas("Demography_ChartArea").AxisX.IsLabelAutoFit = True
Me.ChartDemography.ChartAreas("Demography_ChartArea").AxisX.LabelAutoFitStyle = DataVisualization.Charting.LabelAutoFitStyles.DecreaseFont
Me.ChartDemography.ChartAreas("Demography_ChartArea").AxisX.MajorGrid.Enabled = False
Me.ChartDemography.ChartAreas(0).AxisX.LabelStyle.Angle = -90
' Formatting the Chart Title
Dim T As Title = ChartDemography.Titles.Add("Amount Distribution")
With T
'.ForeColor = Color.Black
'.BackColor = Color.LightBlue
.Font = New System.Drawing.Font("Times New Roman", 11.0F, System.Drawing.FontStyle.Bold)
' .BorderColor = Color.Black
End With
ChartDemography.Series(0).Label = "#PERCENT\n#VALY"
ChartDemography.Series(0).LegendText = "#VALX"
ChartDemography.Series("ChartInv").IsValueShownAsLabel = True