菜鸟学堂
在线运行
源代码
<!DOCTYPE html> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <link rel="stylesheet" href="/try/showrazor.css" /> </head> <body> <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> </body> </html>
运行结果
在线运行
菜鸟学堂 edu.jb51.net