Allora, devi usare il componente MSChart.
Ti crei un array di interi, così:
codice:
Dim arr(x, y) as Integer
Dove x è uguale al numero max di righe meno 1, e y è uguale al numero max di colonne meno 1. Per riga si intende un "campionamento", cioè se questo è il grafico:
codice:
|
|
|
| . .
| / \ /
|/ \ /
| .---.
-|---------------
|
I punti segnati con il "." sono righe. Le colonne sono praticamente le righe.
Poi, trasferisci i dati in questo array, prendendoli per esempio da un DB.
Infine fai
codice:
MSChart1.ChartData = arr
Poi per cambiare i nomi delle colonne (cioè praticamente delle linee sul grafico) nella legenda puoi fare così:
codice:
MSChart1.Column = 1
MSChart1.ColumnLabel = "Acqua"
MSChart1.Column = 2
MSChart1.ColumnLabel = "Aria"
MSChart1.Column = 3
MSChart1.ColumnLabel = "Vino"
Tanto per fare un esempio. Per mostrare la legenda devi settare la proprietà ShowLegend a True