菜单切换
FACESOHO知行者
心灵
记录
远方
赞赏工具
源代码：
点击运行
保存
<span class="marked"> @Code <br> Dim db = Database.Open("SmallBakery") <br> Dim dbdata = db.Query("SELECT Name, Price FROM Product") <br> Dim myChart = new Chart(600,400) <br> myChart.AddTitle("Product Sales") <br> myChart.AddSeries("Employees","column",,,,,dbdata,"Name",dbdata,"Price") <br> myChart.Write()<br> End Code<br> </span>
运行结果
