\'====直接绘制===========================================这个没问题

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

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

\'Dim t As Table = Tables("合同检测目录.合同定制检测") \'定义一个变量t引用数据表

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

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

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

\'Series.Length = t.Rows.Count \'图系的数据点数等于表的行数

\'For i As Integer = 0 To t.Rows.Count - 1 \'指定每个数据点的位置

\'    Series.X(i) = t.Rows(i)("位置点") \'指定水平坐标

\'    Series.Y(i) = t.Rows(i)("芯区直径") \'指定垂直坐标

\'Next

\'====绑定表===============================================这个没有图表显示

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

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

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

Chart.DataSource = "合同检测目录.合同定制检测" \'设置绑定表

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

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

Series.X.DataField = "位置点" \'X轴绑定到月份列

Series.Y.DataField = "芯区直径" \'Y轴绑定到数量列