AJUDA COM CHART

KURTGU 01/08/2016 18:13:15
#465386
Não é isso mestre gostaria de montar um gráfico da data inicial e data final tanto para compra quanto para venda... Ainda não sei como montar isso...
W8.LISBOA 01/08/2016 19:38:50
#465387
Veja se consegue adaptar ao seu uso:

O datagridview deve estar com [Ô]inclusão, edição, exclusão[Ô] desabilitados.
No seu chart inclua as duas [Ô]series[Ô]


  Imports System.Windows.Forms.DataVisualization.Charting
Public Class graficoteste
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        DataGridView1.Rows.Add([Ô]01/01/2016[Ô], [Ô]1,35[Ô], [Ô]1,25[Ô])
        DataGridView1.Rows.Add([Ô]02/01/2016[Ô], [Ô]1,58[Ô], [Ô]1,78[Ô])
        DataGridView1.Rows.Add([Ô]03/01/2016[Ô], [Ô]1,78[Ô], [Ô]1,99[Ô])
        DataGridView1.Rows.Add([Ô]04/01/2016[Ô], [Ô]1,35[Ô], [Ô]1,85[Ô])
        DataGridView1.Rows.Add([Ô]05/01/2016[Ô], [Ô]1,38[Ô], [Ô]1,75[Ô])

        Chart1.Series(0).Points.Clear()

        For i As Integer = 0 To DataGridView1.Rows.Count - 1
            Chart1.Series([Ô]compra[Ô]).Points.AddXY(DataGridView1.Rows.Item(i).Cells(0).Value.ToString, DataGridView1.Rows.Item(i).Cells(1).Value)
            Chart1.Series([Ô]venda[Ô]).Points.AddXY(DataGridView1.Rows.Item(i).Cells(0).Value.ToString, DataGridView1.Rows.Item(i).Cells(2).Value)
        Next i

        Chart1.Series([Ô]compra[Ô]).ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Line
        Chart1.Series([Ô]venda[Ô]).ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Line

    End Sub
End Class

KURTGU 01/08/2016 20:15:34
#465388
Citação:

:
Veja se consegue adaptar ao seu uso:

O datagridview deve estar com [Ô]inclusão, edição, exclusão[Ô] desabilitados.
No seu chart inclua as duas [Ô]series[Ô]


  Imports System.Windows.Forms.DataVisualization.Charting
Public Class graficoteste
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        DataGridView1.Rows.Add([Ô]01/01/2016[Ô], [Ô]1,35[Ô], [Ô]1,25[Ô])
        DataGridView1.Rows.Add([Ô]02/01/2016[Ô], [Ô]1,58[Ô], [Ô]1,78[Ô])
        DataGridView1.Rows.Add([Ô]03/01/2016[Ô], [Ô]1,78[Ô], [Ô]1,99[Ô])
        DataGridView1.Rows.Add([Ô]04/01/2016[Ô], [Ô]1,35[Ô], [Ô]1,85[Ô])
        DataGridView1.Rows.Add([Ô]05/01/2016[Ô], [Ô]1,38[Ô], [Ô]1,75[Ô])

        Chart1.Series(0).Points.Clear()

        For i As Integer = 0 To DataGridView1.Rows.Count - 1
            Chart1.Series([Ô]compra[Ô]).Points.AddXY(DataGridView1.Rows.Item(i).Cells(0).Value.ToString, DataGridView1.Rows.Item(i).Cells(1).Value)
            Chart1.Series([Ô]venda[Ô]).Points.AddXY(DataGridView1.Rows.Item(i).Cells(0).Value.ToString, DataGridView1.Rows.Item(i).Cells(2).Value)
        Next i

        Chart1.Series([Ô]compra[Ô]).ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Line
        Chart1.Series([Ô]venda[Ô]).ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Line

    End Sub
End Class




OK Era isso mesmo, sabe me dizer e que nunca tinha usado esse chart antes tem como colocar alguma coisa pra rolar ou mostrar o restante das datas?
W8.LISBOA 01/08/2016 21:28:19
#465390 
  Chart1.ChartAreas([Ô]ChartArea1[Ô]).AxisX.LabelStyle.Interval = 1


Vai colocar a data na vertical, creio que não resolverá quando o intervalo for de muitos dias, sugiro que deixe o gráfico ocupando grande parte do seu form.

Neste link vai encontrar uma solução para o scroll
MESTRE 02/08/2016 07:38:18
#465395
Citação:

:

  Chart1.ChartAreas([Ô]ChartArea1[Ô]).AxisX.LabelStyle.Interval = 1


Vai colocar a data na vertical, creio que não resolverá quando o intervalo for de muitos dias, sugiro que deixe o gráfico ocupando grande parte do seu form.

Neste link vai encontrar uma solução para o scroll


meu grafico ficou tosco .. agora uma pergunta tem como dar tipo um [Ô]zoom[Ô] nos valores pequenos do grafico pois ele com diferença de 0,05 centavos e no meu grafico aparece uma linha reta pois ta de 0,5 em 0,5.. tentei dessa forma mas ainda não obtive sucesso:



     Chart1.Series(0).ChartType = DataVisualization.Charting.SeriesChartType.Line
        Chart1.ChartAreas(0).AxisX.Interval = [Ô]0.01[Ô]
        Chart1.ChartAreas(0).AxisX.Minimum = [Ô]0.01[Ô]
        Chart1.ChartAreas(0).AxisX.Maximum = [Ô]5[Ô]
KURTGU 02/08/2016 08:05:10
#465397
Citação:

:

  Chart1.ChartAreas([Ô]ChartArea1[Ô]).AxisX.LabelStyle.Interval = 1


Vai colocar a data na vertical, creio que não resolverá quando o intervalo for de muitos dias, sugiro que deixe o gráfico ocupando grande parte do seu form.

Neste link vai encontrar uma solução para o scroll



OK OBRIGADA irei testar..
Página 3 de 3 [26 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar