[VB6] MSChart e ValueScale.Minimum

[Scap]

Ciao a tutti,
dopo aver creato un grafico in VB6 con il componente MSCHART, non riesco ad impostare le scale minime e massime da graficare:
Di seguito riporto la porzione di codice....


Dim StrTag(20, 1)


MSChart1.RowCount = 19
MSChart1.ColumnCount = 1
MSChart1.Column = 1


For k = 1 To 19
Tag1 = "Temperature\Temperatra" & Format(CStr(k), "0##")
StrTag(k, 1) = Format(gTagDb.GetTag(Tag1), "####.##")
Next k

MSChart1.Plot.Axis(VtChAxisIdX).AxisScale.Type = VtChScaleTypeLinear
MSChart1.Plot.Axis(VtChAxisIdX).ValueScale.Minimum = 0
MSChart1.Plot.Axis(VtChAxisIdX).ValueScale.Maximum = 20
MSChart1.Plot.Axis(VtChAxisIdY).Tick.Style = VtChAxisTickStyleNone
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Minimum = 400
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = 600
MSChart1.ChartData = StrTag


Ciao a Tutti e Grazie

[Scap]

Bastava aggiungere la seguente riga prima del setting del valore minimo e massimo:

MSChart1.Plot.Axis(VtChAxisIdX).ValueScale.Auto = False