黄色电影一区二区,韩国少妇自慰A片免费看,精品人妻少妇一级毛片免费蜜桃AV按摩师 ,超碰 香蕉

VB 實(shí)例 使用數(shù)據(jù)庫 根據(jù)數(shù)據(jù)庫顯示餅圖

vb 實(shí)例 使用數(shù)據(jù)庫 根據(jù)數(shù)據(jù)庫顯示餅圖

@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

相關(guān)文章