成免费的crm,久久国产精品新农夫导航新妓网,恋夜秀场全部视频安卓手机,女校花强奷在线播放A级

VB 實例 使用數據庫 根據數組顯示條形圖

vb 實例 使用數據庫 根據數組顯示條形圖

@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

相關文章