@Code
Dim db = Database.Open("SmallBakery") ' 開啟名為 "SmallBakery" 的資料庫
Dim dbdata = db.Query("SELECT Name, Price FROM Product") ' 從 "Product" 表中選擇 "Name" 和 "Price" 列的資料
Dim myChart = new Chart(600,400) ' 建立一個 600x400 畫素的圖表
myChart.AddTitle("Product Sales") ' 新增圖表的標題，標題為 "Product Sales"（產品銷售額）
myChart.DataBindTable(dbdata,"Name") ' 將資料繫結到圖表，使用 "Name" 列作為 X 軸
myChart.Write() ' 將圖表輸出
End Code