VB 2010 Chart Frage

[sm4ck]

Hallo,

ich lese eine TXT-Datei ein, die 200 oder mehr strings enthält.
Ich teile diesen String auf mehrere Series innerhalb eines Charts auf.

Wie lasse ich automatisch einen Scrollbalken erstellen, wenn mehr als 100 Werte innerhalb der TXT-Datei aufgezeichnet werden?

Jetzt im Moment werden immer die 200 oder mehr Werte in dem Chart angezeit.
Diese würde ich gern etwas genauer mit hilfe eines Scrollbalkens anzeigen lassen.

Ich hoffe mir kann jemand helfen.

vielen Dank schon mal für die Mühe

[sm4ck]

Und noch eine Frage zu den Charts....

Bei mir beginnt das eintragen der einzellnen Punkte bei 1. Wie bringe ich den Chart dazu den ersten Punkt bei der Achse also an 0 zu setzen?

[highlight=vbnet]
If OpenFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then

MsgBox("Die Datei " & OpenFileDialog1.FileName & " wurde eingelesen.", vbOKOnly)

Dim strFilename As String = OpenFileDialog1.FileName
Dim strValue As String = ""
Dim reader As StreamReader
Dim enc As System.Text.Encoding

enc = System.Text.Encoding.ASCII

reader = New StreamReader(strFilename, enc)

Chart1.Legends("Legend1").Enabled = True

Chart1.Series.Clear()
Chart1.Series.Add(My.Settings.Eingang1)
Chart1.Series(My.Settings.Eingang1).ChartType = SeriesChartType.Line
Chart1.Series.Add(My.Settings.Eingang2)
Chart1.Series(My.Settings.Eingang2).ChartType = SeriesChartType.Line
Chart1.Series.Add(My.Settings.Eingang3)
Chart1.Series(My.Settings.Eingang3).ChartType = SeriesChartType.Line
Chart1.Series.Add(My.Settings.Eingang4)
Chart1.Series(My.Settings.Eingang4).ChartType = SeriesChartType.Line
Chart1.Series.Add(My.Settings.Eingang5)
Chart1.Series(My.Settings.Eingang5).ChartType = SeriesChartType.Line
Chart1.Series.Add(My.Settings.Eingang6)
Chart1.Series(My.Settings.Eingang6).ChartType = SeriesChartType.Line

While (reader.Peek > -1)

strValue = reader.ReadLine

Dim D As String() = Split(strValue, ";")

Chart1.Series(My.Settings.Eingang1).Points.AddY(D( 0))
Chart1.Series(My.Settings.Eingang2).Points.AddY(D( 1))
Chart1.Series(My.Settings.Eingang3).Points.AddY(D( 2))
Chart1.Series(My.Settings.Eingang4).Points.AddY(D( 3))
Chart1.Series(My.Settings.Eingang5).Points.AddY(D( 4))
Chart1.Series(My.Settings.Eingang6).Points.AddY(D( 5))

End While

reader.Close()

End If
[/highlight]

[sm4ck]

kann mir hierzu keiner weiterhelfen?

[Ralf Jansen]

Ich vermute dafür ist die Commmunity hier zu klein als das da zufällig jemand Ahnung von hat. Insofern auch noch das ein potentieller Helfer erraten muss welches Chart Control du den benutzt (im Framework gibt es ja keins). Dort wo du das Control her hast gibt es bestimmt auch ein spezielles Forum für dieses Control.

[sm4ck]

ich habe bei meinem VB2010 kein chartcontrol oder sonstiges installiert.
könnte sein das es da schon enthalten ist.. Schade.. dann probier ich einfach weiter.. danke trotzdem

[Ralf Jansen]

Mea Culpa. Es gibt doch ein Chart Control seit .NET 4. Früher war das ein extra Download.

[sm4ck]

ah, ok... hab erst mit vb2010 angefangen...