- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 这种能不能不绑定表，做出来，我看帮助这种并列多柱的都是绑定了表呢 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=147394)
-- 发布时间：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编辑过]
-- 发布时间：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，看方法二
-- 发布时间：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.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个坐标系合并起来对比相同物体的 就在一起
Series.Length 相当于 每个单独坐标系 对象数组，
然后 2个坐标系合并起来对比相同物体的 就在一起
我理解的对吧
-- 发布时间：2020/3/16 8:31:00
--
是的