代码如下：
Tables("开发者主控窗口_Table3").Filter = "[月份] Like '2019*'"
Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Chart = e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.VisualEffect = True '加上这一行,让你的图表更漂亮
Chart.ChartType = ChartTypeEnum.Bar '图表类型该为Bar(条形)
Chart.DataSource = "每月业绩目标与实际业绩表" '设置绑定表
Chart.SeriesList.Clear() '清除图表原来的图系
Series = Chart.SeriesList.Add() '增加第一个图系
Series.Text = "目标销售额"
Series.X.DataField = "月份" 'X轴绑定到产品列
Series.Y.DataField = "业绩目标_销售额万元" 'Y轴绑定到数量列
Series = Chart.SeriesList.Add() '增加第二个图系
Series.Text = "实际销售额"
Series.X.DataField = "月份" 'X轴绑定到产品列
Series.Y.DataField = "实际业绩_销售额万元" 'Y轴绑定到数量列
Chart.LegendVisible = True '显示图列
Chart.LegendCompass= CompassEnum.South '图列显示在南方(底端)
老师，我有个datatables( "每月业绩目标与实际业绩表" ),然后在一个窗口中有一个副本表Tables("开发者主控窗口_Table3")，我现在需要对该副本表进行筛选，
选出“月份为2019开头”的所有行，然后针对这些行生成一个图表。但是生成图表的时候，需要设置图表的绑定表，即Chart.DataSource， 绑定表好像只能绑定
datatables,但是我需要的是绑定筛选过后的副本表Tables("开发者主控窗口_Table3")，请教代码怎么写？谢谢
加好友 
发短信
Post By：2021/5/2 12:36:00 [只看该作者]
