以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]图表修改  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=148702)

--  作者:5233655cs
--  发布时间:2020/4/13 21:45:00
--  [求助]图表修改

Dim Chart As WinForm.Chart \'定义一个图表变量
Dim
Series As WinForm.ChartSeries \'定义一个图系变量
Dim
tbl As DataTable = DataTables("订单") \'定义一个变量tbl引用数据表
Dim
lst As List(Of String) = tbl.GetValues("产品") \'获得产品名称集合
Chart = e.Form.Controls(
"Chart1") \' 引用窗口中的图表
Chart.SeriesList.Clear()
\'清除图表原来的图系
Series = Chart.SeriesList.Add()
\'增加一个图系
Series.Length = lst.Count
\'设置图系的长度
For
i As integer = 0 to lst.Count - 1 \'指定每个数据点的位置
    Series.X(i) = i
\'指定水平坐标
    Series.Y(i) = tbl.Compute(
"Sum(数量)","[产品] = \'" & lst(i) & "\'") \'指定垂直坐标
    Chart.AxisX.SetValueLabel(i, lst(i))
\'指定字符表示
Next

Chart.AxisX.AnnoWithLabels =
True
\'启用字符标示


-----------------------------------------------------------------------------------


老师 这个帮助中,   我的表格 是从sql中  sel ect from 筛选出来的表格  用在 “窗口1_table1”中,


我想用图表统计这个表格,那么下面的语句如何修改?   

  Dim tbl As DataTable = DataTables("订单")


另外我统计的是符合条件的个数,sum(数量)如何修改? 





--  作者:有点蓝
--  发布时间:2020/4/13 22:05:00
--  
Dim tbl As DataTable = DataTables("窗口1_table1")

count(数量)

--  作者:5233655cs
--  发布时间:2020/4/13 22:14:00
--  
我的   窗口1_table1  和 chart  不在同一个窗口上。


提示我 不存在  窗口1_table1  的 datatable  


我窗口1上的 窗口1_table1 是SQLQuery类型的
[此贴子已经被作者于2020/4/13 22:20:52编辑过]

--  作者:有点蓝
--  发布时间:2020/4/13 22:22:00
--  
不需要在同一个窗口上,但是窗口1必须是打开状态
--  作者:5233655cs
--  发布时间:2020/4/13 22:30:00
--  
谢谢  好了
--  作者:5233655cs
--  发布时间:2020/4/13 23:25:00
--  
老师,  我Y轴  可以自定义数值吗?   他现在数值是根据现有数值  设置最大最小值的。

我能不能自定义设置 整数(因为我是数符合条件的数量), 最小从0 开始, 最大值 为我数到的最大值。

--  作者:有点蓝
--  发布时间:2020/4/14 9:03:00
--  
参考:http://www.foxtable.com/webhelp/topics/1016.htm