简单教程
提交运行
代码编辑器:
@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
运行结果: