Código de Visual Basic.NET - Crear gráfica con datos de un DataTable

Imágen de perfil
Val: 50
Ha disminuido su posición en 5 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Crear gráfica con datos de un DataTablegráfica de visualizaciones


Visual Basic.NET

Actualizado el 2 de Junio del 2016 por Hugo (2 códigos) (Publicado el 23 de Mayo del 2016)
17.401 visualizaciones desde el 23 de Mayo del 2016
Para el ejemplo utilizaremos un Button y un Chart.

graf0
graf1

Creamos nuestra Form y configuraremos el Chart.

graf2

Seleccionamos SERIES y lo cambiamos por EDAD.

graf3

Dentro del botón tecleamos el siguiente código,

graf4

El resultado seria:

graf5

Requerimientos

VB:Net 2010
estrellaestrellaestrellaestrellaestrella(4)

Publicado el 23 de Mayo del 2016gráfica de visualizaciones de la versión: VB:Net 2010
17.402 visualizaciones desde el 23 de Mayo del 2016
estrellaestrellaestrellaestrellaestrella
estrellaestrellaestrellaestrella
estrellaestrellaestrella
estrellaestrella
estrella

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim miDataTable As New DataTable
        miDataTable.Columns.Add("Nombre")
        miDataTable.Columns.Add("Edad")
        Dim Renglon As DataRow = miDataTable.NewRow()
        'Guardamos los datos en un datatable
        Renglon("Nombre") = "Luis"
        Renglon("Edad") = "30"
        miDataTable.Rows.Add(Renglon)
        Renglon = miDataTable.NewRow()
        Renglon("Nombre") = "Carmen"
        Renglon("Edad") = "25"
        miDataTable.Rows.Add(Renglon)
        Renglon = miDataTable.NewRow()
        Renglon("Nombre") = "Pedro"
        Renglon("Edad") = "15"
        miDataTable.Rows.Add(Renglon)
        Renglon = miDataTable.NewRow()
        Renglon("Nombre") = "Juana"
        Renglon("Edad") = "45"
        miDataTable.Rows.Add(Renglon)
        Renglon = miDataTable.NewRow()
        Renglon("Nombre") = "Pablo"
        Renglon("Edad") = "18"
        miDataTable.Rows.Add(Renglon)
        Dim miView As DataView = New DataView(miDataTable) 'Enviamos a un dataview los datos
        For x = 0 To miView.Count - 1
            'Tomanos los datos de DataView para la gráfica
            Me.Chart1.Series("Edad").Points.AddXY(miView(x)("Nombre"), miView(x)("Edad"))
        Next
    End Sub



Comentarios sobre la versión: VB:Net 2010 (4)

conejo
25 de Septiembre del 2019
estrellaestrellaestrellaestrellaestrella
Si, muy bueno.
Sólo añadiría que en el web.config hay que eliminar la línea que hace referencia al chart y reemplazarla por esta: <add key="ChartImageHandler" value="storage=memory;deleteAfterServicing=true;"/>
Responder
DULCE
20 de Octubre del 2020
estrellaestrellaestrellaestrellaestrella
Estoy trabajando en un programa pero las graficas no se como hacerlas


Quiero tomar los datos dentro de dos datagriedview y hacer graficas de puntos pero no encuento como en ek eje x un data y el y el otro


pueden ayudarme ...
Responder
Imágen de perfil
22 de Octubre del 2020
estrellaestrellaestrellaestrellaestrella
Lo que puede hacer es crear un datatable con los 2 gridview y tomar el código de este ejemplo.

Saludos
Responder
luis
23 de Octubre del 2020
estrellaestrellaestrellaestrellaestrella
1
2
3
4
5
6
7
8
9
10
llenargrid("select item,produccion,fecha from mov where empleado='" & TextBox1.Text & "' and fechal>='" & fecha0 & "' and fecha<='" & fecha1 & "' group by empleado,fecha", DataGridView6)
 
 
For x = 0 To DataGridView6.Rows.Count - 1
    'Tomanos los datos de DataView para la gráfica
    DateTimePicker3.Value = DataGridView6.Item(2, x).Value.ToString
    Dim serie2 As String = Format(DateTimePicker3.Value.Date, "yyyy/MM/dd")
    Me.Chart1.Series("Produccion").Points.AddXY(serie2, DataGridView6.Item(1, x).Value)
    'produccion es el nombre de la serie en las propiedades del chart
Next
Responder

Comentar la versión: VB:Net 2010

Nombre
Correo (no se visualiza en la web)
Valoración
Comentarios...
CerrarCerrar
CerrarCerrar
Cerrar

Tienes que ser un usuario registrado para poder insertar imágenes, archivos y/o videos.

Puedes registrarte o validarte desde aquí.

Codigo
Negrita
Subrayado
Tachado
Cursiva
Insertar enlace
Imagen externa
Emoticon
Tabular
Centrar
Titulo
Linea
Disminuir
Aumentar
Vista preliminar
sonreir
dientes
lengua
guiño
enfadado
confundido
llorar
avergonzado
sorprendido
triste
sol
estrella
jarra
camara
taza de cafe
email
beso
bombilla
amor
mal
bien
Es necesario revisar y aceptar las políticas de privacidad

http://lwp-l.com/s3535