VB 實(shí)例 使用數(shù)據(jù)庫(kù) 根據(jù)數(shù)組顯示條形圖

vb 實(shí)例 使用數(shù)據(jù)庫(kù) 根據(jù)數(shù)組顯示條形圖

@code 
dim mychart as new chart(600,400)
dim xarr(4)
xarr(0)="peter"
xarr(1)="andrew"
xarr(2)="julie"
xarr(3)="mary"
xarr(4)="dave"
dim yarr(4)
yarr(0)="2"
yarr(1)="6"
yarr(2)="4"
yarr(3)="5"
yarr(4)="3"
mychart.addtitle("employees") 
mychart.addseries("employees","column",,,,,xarr,,yarr,,) 
mychart.write()
end code

相關(guān)文章
亚洲国产精品第一区二区,久久免费视频77,99V久久综合狠狠综合久久,国产免费久久九九免费视频