Hallo,
Ich habe mit VB2010 einen Datalogger geschrieben und die Werte lese ich jede Sekunde ein und im Chart angezeigt. Der Chart wird alle 1 Sekunde aktualisiert.
Das Problem oder was ich gerne ändern möchte ist, das mit der Zeit die X-Achse gestaucht wird. Nach einer bestimmten Zeit kann man nicht viel mehr erkennen.
Ich möchte das die X-Achse ab 10 Werten weitergeschoben wird. Wie ein FiFo-Speicher. Zum Beispiel Anzeige von 0 - 10 Auf der X-Achse beim 11 Werte ist dann die Anzeige von 1 bis 11 und soweiter...
Anbei Bilder damit man es besser versteht.
Auszug Code:
Wieso landet das in den Boarddiskussionen?!
Verschoben. ~Thunderbolt
Ich habe mit VB2010 einen Datalogger geschrieben und die Werte lese ich jede Sekunde ein und im Chart angezeigt. Der Chart wird alle 1 Sekunde aktualisiert.
Das Problem oder was ich gerne ändern möchte ist, das mit der Zeit die X-Achse gestaucht wird. Nach einer bestimmten Zeit kann man nicht viel mehr erkennen.
Ich möchte das die X-Achse ab 10 Werten weitergeschoben wird. Wie ein FiFo-Speicher. Zum Beispiel Anzeige von 0 - 10 Auf der X-Achse beim 11 Werte ist dann die Anzeige von 1 bis 11 und soweiter...
Anbei Bilder damit man es besser versteht.
Auszug Code:
VB.NET-Quellcode
- Private Sub Timer7_Tick(sender As System.Object, e As System.EventArgs) Handles Timer7.Tick
- Timer7.Interval = SetTimeBase.Text 'Timer über das Textfeld "time base" verändern.
- Dim part1 As Integer = 0
- Dim part2 As Integer = 0
- Chart1.Series(0).XValueType = DataVisualization.Charting.ChartValueType.Auto
- Chart1.Series(1).XValueType = DataVisualization.Charting.ChartValueType.Auto
- Chart1.Series(2).XValueType = DataVisualization.Charting.ChartValueType.Auto
- Chart1.Series(3).XValueType = DataVisualization.Charting.ChartValueType.Auto
- Chart1.Series(4).XValueType = DataVisualization.Charting.ChartValueType.Auto
- Chart1.Series(5).XValueType = DataVisualization.Charting.ChartValueType.Auto
- Chart1.Series(6).XValueType = DataVisualization.Charting.ChartValueType.Auto
- Chart1.Series(7).XValueType = DataVisualization.Charting.ChartValueType.Auto
- Chart1.Series(8).XValueType = DataVisualization.Charting.ChartValueType.Auto
- Chart1.Series(9).XValueType = DataVisualization.Charting.ChartValueType.Auto
- Chart1.Series(0).Points.AddXY(TextBox1.Text, Value1.Text)
- Chart1.Series(1).Points.AddXY(TextBox1.Text, Value2.Text)
- Chart1.Series(2).Points.AddXY(TextBox1.Text, Value3.Text)
- Chart1.Series(3).Points.AddXY(TextBox1.Text, Value4.Text)
- Chart1.Series(4).Points.AddXY(TextBox1.Text, Value5.Text)
- Chart1.Series(5).Points.AddXY(TextBox1.Text, Value6.Text)
- Chart1.Series(6).Points.AddXY(TextBox1.Text, Value7.Text)
- Chart1.Series(7).Points.AddXY(TextBox1.Text, Value8.Text)
- Chart1.Series(8).Points.AddXY(TextBox1.Text, Value9.Text)
- Chart1.Series(9).Points.AddXY(TextBox1.Text, Value10.Text)
- End Sub
Wieso landet das in den Boarddiskussionen?!
Verschoben. ~Thunderbolt
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Thunderbolt“ ()