// First set of data
Var data(2) As Double
data(0) = 5
data(1) = 7
data(2) = 10
data.Add(15)
data.Add(2)
data.Add(24)
Var mySet As New WebChartLinearDataset(“Bar Data”, &cFF0000, True, data)
mySet.ChartType = WebChartLinearDataset.ChartTypes.Bar
Me.AddDataset(mySet)
// Second set of data
Var data2() As Double
For i As Integer = 1 To 6
data2.Add(System.Random.InRange(5, 40))
Next
Var myset2 As New WebChartLinearDataset(“Line Data”, &c0000FF, True, data2)
myset2.ChartType = WebChartLinearDataset.ChartTypes.Line
Me.AddDataset(myset2)