以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]图表修改  (http://foxtable.com/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