Hola nuevamente, espero esten bien.
Ando tratando de poner títulos a cada barra de un gráfico que se crea a través de una consulta. El código que llevo es este:
Código vb:
Ver originalTablaDatos = New DataTable
_adaptador.Fill(TablaDatos)
Dim ds As New DataSet
If TablaDatos.Rows.Count > 0 Then
Dim ChartArea1 As ChartArea = New ChartArea()
Dim Legend1 As Legend = New Legend()
Dim Series1 As Series = New Series()
Dim Chart1 = New Chart()
Me.Controls.Add(Chart1)
'Chart1.Series("Series1").SmartLabelStyle.Enabled = True
ChartArea1.Name = "ChartArea1"
Chart1.ChartAreas.Add(ChartArea1)
Legend1.Name = "Legend1"
Chart1.Legends.Add(Legend1)
Chart1.Location = New System.Drawing.Point(10, 150) 'UBICACION EN PANTALLA
Chart1.Size = New System.Drawing.Size(1000, 550) ' TAMAÑO
Chart1.Name = "Chart1"
Series1.ChartArea = "ChartArea1"
Series1.Legend = "Legend1"
Series1.Name = "Series1"
Chart1.Series.Add(Series1)
Chart1.TabIndex = 1
Chart1.Text = "Chart1"
Chart1.Series(0).IsValueShownAsLabel = True
Chart1.Series(0).Font = New Font("Times", 15) 'TIPOGRAFIA LABELS BARRAS
Chart1.ChartAreas(0).AxisX.LabelStyle.Font = New Font("Verdana", 8) 'TIPOGRAFIA LABELS X
Chart1.Series("Series1").YValueMembers = "CANTIDAD" 'ALTURA BARRAS
Chart1.DataSource = TablaDatos
Else
MsgBox("NO SE ENCONTRARON DATOS, VUELVA A INTENTARLO")
End If
Y no entiendo como poner El título a cada barra en la parte de abajo, aclarando que el título es texto y en algunos casos bastante extenso como por ejemplo " TRASPONER LUZ EN ROJO"
Alguien me podría ayudar con el nombre del atributo que me deje hacerlo?
Muchas Gracias!!!