@Code
Dim db = Database.Open("SmallBakery")
Dim dbdata = db.Query("SELECT Name, Price FROM Product")
Dim myChart = new Chart(600,400)
myChart.AddTitle("Product Sales")
myChart.AddSeries("Employees","column",,,,,dbdata,"Name",dbdata,"Price")
myChart.Write()
End Code