Preciso montar um grafico de Vendas por Grupo por Horas onde : data = dia hora = 10 - (só isso hora cheia) qtde = quantidade descric = grupo tenho que mostrar todas as datas com as qtde vendidas na hora. To tentando usar o grafh1, mas to conseguindo abaixo o código : Dim pontos%
'Graph1.DrawMode = 1
Graph1.NumSets = 1
Graph1.NumPoints = 3
Graph1.AutoInc = 1
'Graph1.GridStyle = 2 '1
MyTable.MoveFirst
pontos = 1
Do Until MyTable.EOF()
If pontos > Graph1.NumPoints Then Graph1.NumPoints = pontos
Graph1.ThisPoint = pontos
Graph1.GraphData = MyTable.Fields("QTDE_TOTAL").Value
Graph1.ThisPoint = pontos
Graph1.LegendText = MyTable.Fields("DATA").Value
Graph1.ThisPoint = pontos
Graph1.LabelText = MyTable("DESCRICAO")
MyTable.MoveNext
pontos = pontos + 1
Loop
Graph1.DrawMode = 2
Graph1.GraphType = 6
TelaGrafico.Visible = True
Graph1.GraphTitle = "VENDAS POR HORA" Alguém pode me dar uma ajuda ? Ou se tiver algum jeito diferente pode me ajudar obrigado