以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 复选框选定行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=90305) |
|
-- 作者:fox-man -- 发布时间:2016/9/9 12:39:00 -- 复选框选定行
|
|
-- 作者:fox-man -- 发布时间:2016/9/9 14:05:00 -- |
|
-- 作者:有点蓝 -- 发布时间:2016/9/9 17:25:00 -- 上例子测试 |
|
-- 作者:狐狸爸爸 -- 发布时间:2016/9/9 17:46:00 --
不要用绑定的方式,用编码添加数据点的方式,这两节的帮助都有介绍添加数据点生成图表的方法: http://www.foxtable.com/webhelp/scr/0968.htm 帮助是所有行,你改一下就可以是符合条件的行:
Dim Chart As WinForm.Chart \'定义一个图表变量 Dim Series As WinForm.ChartSeries \'定义一个图系变量 Dim Rows As List(of Row) = Tables("表A").GetCheckedRows() Chart= e.Form.Controls("Chart1") \' 引用窗口中的图表 Chart.SeriesList.Clear() \'清除图表原来的图系 Series = Chart.SeriesList.Add() \'增加一个图系 Series.Length = Rows.Count \'图系的数据点数等于表的行数 For i As Integer = 0 To Rows.Count - 1 \'指定每个数据点的位置 Series.X(i) = Rows(i)("月份") \'指定水平坐标 Series.Y(i) = Rows(i)("数量") \'指定垂直坐标 Next
[此贴子已经被作者于2016/9/9 17:53:23编辑过]
|