// Set he chart size. Chart.Width = 600; Chart.Height = 450;
Chart.YAxis.Maximum = 50;
// Set a default gauge face background color. Chart.DefaultSeries.Background = new Background(Color.FromArgb(230, 230, 255), Color.FromArgb(245, 245, 255), -90);
// Set the title. //Chart.Title="My Chart"; Chart.Debug = true;
// Set the directory where the related JSC files will be created and stored. Chart.TempDirectory="temp";
// Enable JSCharting Chart.JS.Enabled = true;
// Add the random data. Chart.SeriesCollection.Add(getRandomData());
}
SeriesCollection getRandomData() { SeriesCollection SC = new SeriesCollection(); Random myR = new Random(); for(int a = 1; a < 4; a++) { Series s = new Series(); s.Name = "Series " + a; for(int b = 1; b < 2; b++) { Element e = new Element(); e.Name = "E " + (b+1); e.YValue = 10+myR.Next(40);
' Set he chart size. Chart.Width = 600 Chart.Height = 450
Chart.YAxis.Maximum = 50
' Set a default gauge face background color. Chart.DefaultSeries.Background = New Background(Color.FromArgb(230, 230, 255), Color.FromArgb(245, 245, 255), -90)
' Set the title. 'Chart.Title="My Chart"; Chart.Debug = True
' Set the directory where the related JSC files will be created and stored. Chart.TempDirectory="temp"
' Enable JSCharting Chart.JS.Enabled = True
' Add the random data. Chart.SeriesCollection.Add(getRandomData())
End Sub
Function getRandomData() As SeriesCollection Dim SC As SeriesCollection = New SeriesCollection() Dim myR As Random = New Random() For a As Integer = 1 To 3 Dim s As Series = New Series() s.Name = "Series " & a For b As Integer = 1 To 1 Dim e As Element = New Element() e.Name = "E " & (b+1) e.YValue = 10+myR.Next(40)
Previous