图例显示错误（显示“series = 0”） - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以下代码能出现图表，但有一个问题，图例显示错误（显示“series = 0”），代码错误出在哪儿？谢谢！

Dim Chart As WinForm.Chart '定义一个图表变量

Dim Series As WinForm.ChartSeries '定义一个图系变量

Chart= e.Form.Controls("Chart1") ' 引用窗口中的图表

Chart.DataSource = "统计表1" '设置绑定表

Chart.SeriesList.Clear() '清除图表原来的图系

Series = Chart.SeriesList.Add() '增加一个图系

Series.X.DataField = "责任部门" 'X轴绑定到月份列

Series.Y.DataField = "积分" 'Y轴绑定到数量列

Series.DataLabelText = "{#YVAL}"

Chart.LegendVisible = True '显示图列

主题：图例显示错误（显示“series = 0”）