VB 实例 使用数据库 根据数据库显示饼图

vb 实例 使用数据库 根据数据库显示饼图

@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

相关文章