Hello,
How about changing your code to something as shown below. Please have a look at this[
^] article, available here on CodeProject.
Dim LabelArr() As String = {"FSinDay", "FSoutDay", "APinDay", "APoutDay"}
Dim zg1ppl As PointPairList
Dim x As Double
Dim y As Double
Dim rand As new Random()
For c = 0 To UBound(labelArr)
zg1ppl = new PointPairList()
For d = 0 To 10
x = (double) d + 10;
y = (rand.NextDouble() * 5) + Math.Sin( (double) d * 0.2);
zg1ppl.Add(x, y)
Next
myCurve = myPane.AddCurve(LabelArr(c), zg1ppl, Color.Green, SymbolType.Square)
myCurve.Symbol.Fill = New Fill(Color.White)
Next