Foxtable(狐表)用户栏目专家坐堂 → 用列名作为X轴的图表如何绘制


  共有352人关注过本帖树形打印复制链接

主题:用列名作为X轴的图表如何绘制

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113597 积分:578504 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/4/8 9:13:00 [显示全部帖子]

遍历列生成就行了

Dim Chart As WinForm.Chart '定义一个图表变量
Dim
 Series As WinForm.ChartSeries '定义一个图系变量
Dim
 r as row = Tables("统计表1").current '定义一个变量t引用数据表
Chart= e.Form.Controls(
"Chart1"' 引用窗口中的图表
Chart.SeriesList.Clear() 
'清除图表原来的图系
Series = Chart.SeriesList.Add() 
'增加一个图系
Series.Length = 30 '需要显示的列的个数

For
 i As integer = 1 to 30 '指定每个数据点的位置
    Series.X(i) = (i-1)
 '指定水平坐标
    Series.Y(i) = 
r("4月" & i & "日") '指定垂直坐标
Next

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113597 积分:578504 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/4/8 9:52:00 [显示全部帖子]

参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=194981&skin=0

 回到顶部