以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  这种能不能不绑定表,做出来,我看帮助这种并列多柱的都是绑定了表呢  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=147394)

--  作者:a937775799
--  发布时间:2020/3/15 20:28:00
--  这种能不能不绑定表,做出来,我看帮助这种并列多柱的都是绑定了表呢

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200315202744.jpg
图片点击可在新窗口打开查看
Dim ct As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
ct= e.Form.Controls("chart") \' 引用窗口中的图表
ct.ChartType = ChartTypeEnum.Bar \'图表类型改为Bar(条形)
ct.SeriesList.Clear() \'清除图表原来的图系
Series = ct.SeriesList.Add() \'增加一个图系
Series.Length = 2     \'图系包括10个数据点
Series.Text = "test"
Series.X(0) = 0  \'指定水平坐标
Series.Y(0) = 10
Series.X(1) = 1  \'指定水平坐标
Series.Y(1) = 6  
ct.AxisX.SetValueLabel( 0 , "test") \'指定字符表示
ct.AxisX.AnnoWithLabels = True \'启用字符标示
我这样想做一个一个列可就一个呀

[此贴子已经被作者于2020/3/15 21:59:58编辑过]

--  作者:a937775799
--  发布时间:2020/3/15 22:13:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200315221044.jpg
图片点击可在新窗口打开查看
我想要的,可以是我上面代码显示的是

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200315220933.jpg
图片点击可在新窗口打开查看


--  作者:有点蓝
--  发布时间:2020/3/15 23:35:00
--  
参考:http://www.foxtable.com/webhelp/topics/0970.htm,看方法二
--  作者:a937775799
--  发布时间:2020/3/16 0:01:00
--  
终于看懂了 ,我改成这样才看懂
For  i As Integer = 0 To 1
        Series = Chart.SeriesList.Add() \'增加一个图系
        Series.Text = "name" & i \'设置图系的标题
        Series.Length = 4  \'设置图系的长度
        For r As Integer = 0 To Series.Length -1
            Series.X(r) = r
            Series.Y(r) = r + Rand.Next(5)
        Next
Next
‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘
Series = Chart.SeriesList.Add()   相当于 添加一个坐标系对象,
Series.Length 相当于 每个单独坐标系 对象数组,
然后 2个坐标系合并起来对比相同物体的 就在一起
我理解的对吧

--  作者:有点蓝
--  发布时间:2020/3/16 8:31:00
--  
是的