SeriesCollection getRandomData() { SeriesCollection SC = new SeriesCollection(); Random myR = new Random(); for(int a = 1; a < 2; a++) { Series s = new Series(); s.Name = "Series " + a; for(int b = 1; b < 6; b++) { Element e = new Element(); e.Name = "E " + b; e.YValue = 20 + myR.Next(30) - b*3; s.Elements.Add(e); } SC.Add(s); }
Function getRandomData() As SeriesCollection Dim SC As SeriesCollection = New SeriesCollection() Dim myR As Random = New Random() For a As Integer = 1 To 1 Dim s As Series = New Series() s.Name = "Series " & a For b As Integer = 1 To 5 Dim e As Element = New Element() e.Name = "E " & b e.YValue = 20 + myR.Next(30) - b*3 s.Elements.Add(e) Next b SC.Add(s) Next a
Previous