Updating MS Charting ChartArea

See more:

VB8

VB

Hi guys,

I have searched for a solution for my problem for a long while now. I know it might just be a small issue but right now I can't solve it and I would be really happy getting some help bevore gettin a breakdown :P

So what I try to do is streaming data from an external .exe file redirecting the console output to my Chart.Series("Meas"). I have to split the datatransfer into several steps cause the sub program takes a looong while.

I got a little loop for the data collection steps and would like to refresh my ChartArea in the end of every loop. Unfortunately it won't work... Wahhh! :P Here is the Part of my Program (I marked the line where i want to refresh my ChartArea):

-----------------------------------------------------------------------------------

Private Sub GetData_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GetData.Click

        Dim DataSet As String
        Dim GetData As New System.Diagnostics.Process()
        GetData.StartInfo.UseShellExecute = False
        GetData.StartInfo.RedirectStandardOutput = True
        GetData.StartInfo.CreateNoWindow = True

        Chart1.Series.Add("Meas")
        Chart1.Series("Meas").ChartType = SeriesChartType.FastLine

        For j = 0 To (CDbl(FStop.Text) - CDbl(FStart.Text)) / 10

            Dim TempStart As Double
            Dim TempStop As Double
            TempStart = CDbl(FStart.Text) + j
            TempStop = CDbl(FStart.Text) + 10 + j

            GetData.StartInfo.FileName = "d:\...\test.exe"
            GetData.StartInfo.Arguments = TempStart & " " & TempStop & " " & RBand.Text & " " & VBand.Text & " " & SweepDelay.Text & " " & IntAmp.Text

            GetData.Start()
            DataSet = GetData.StandardOutput.ReadToEnd()
            GetData.WaitForExit()
            GetData.Close()

            Dim Hilf_Z As Object
            Hilf_Z = Split(DataSet, vbCrLf)

            Dim i As Integer
            For i = 0 To UBound(Hilf_Z) - 2
                Chart1.Series("Meas").Points.AddXY(CDbl(Hilf_Z(i)) * 1000000.0, Val(Hilf_Z(i + 1)))
                i = i + 2
            Next
           
            
            '<-------- here I want to refresh my Chart
            'something like: Chart1.ChartArea("ChartArea1").Refresh()
            'or              Chart1.Series("Meas1").Refresh()
            'can't find any methods...

        Next
    End Sub

Sorry for my baaad programming skills, and thanks in advance!
Greeeez, Tom