Foros del Web » Programación para mayores de 30 ;) » .NET »

Títulos Charts

Estas en el tema de Títulos Charts en el foro de .NET en Foros del Web. 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 ...
  #1 (permalink)  
Antiguo 06/05/2016, 08:55
 
Fecha de Ingreso: septiembre-2014
Mensajes: 79
Antigüedad: 9 años, 8 meses
Puntos: 0
Títulos Charts

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 original
  1. TablaDatos = New DataTable
  2.             _adaptador.Fill(TablaDatos)
  3.             Dim ds As New DataSet
  4.             If TablaDatos.Rows.Count > 0 Then
  5.                 Dim ChartArea1 As ChartArea = New ChartArea()
  6.                 Dim Legend1 As Legend = New Legend()
  7.                 Dim Series1 As Series = New Series()
  8.                 Dim Chart1 = New Chart()
  9.                 Me.Controls.Add(Chart1)
  10.                 'Chart1.Series("Series1").SmartLabelStyle.Enabled = True
  11.                ChartArea1.Name = "ChartArea1"
  12.                 Chart1.ChartAreas.Add(ChartArea1)
  13.                 Legend1.Name = "Legend1"
  14.                 Chart1.Legends.Add(Legend1)
  15.                 Chart1.Location = New System.Drawing.Point(10, 150) 'UBICACION EN PANTALLA
  16.                Chart1.Size = New System.Drawing.Size(1000, 550) ' TAMAÑO
  17.                Chart1.Name = "Chart1"
  18.                 Series1.ChartArea = "ChartArea1"
  19.                 Series1.Legend = "Legend1"
  20.                 Series1.Name = "Series1"
  21.                 Chart1.Series.Add(Series1)
  22.                 Chart1.TabIndex = 1
  23.                 Chart1.Text = "Chart1"
  24.                 Chart1.Series(0).IsValueShownAsLabel = True
  25.                 Chart1.Series(0).Font = New Font("Times", 15) 'TIPOGRAFIA LABELS BARRAS
  26.                Chart1.ChartAreas(0).AxisX.LabelStyle.Font = New Font("Verdana", 8) 'TIPOGRAFIA LABELS X
  27.                Chart1.Series("Series1").YValueMembers = "CANTIDAD" 'ALTURA BARRAS
  28.                Chart1.DataSource = TablaDatos
  29.  
  30.             Else
  31.                 MsgBox("NO SE ENCONTRARON DATOS, VUELVA A INTENTARLO")
  32.             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!!!
__________________
Un perro no es perro por ladrar, sino por ser perro...

Última edición por robertocarrillo; 06/05/2016 a las 09:08

Etiquetas: datatable
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 06:43.