Foxtable(狐表)用户栏目专家坐堂 → 这个图表怎么修改?


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

主题:这个图表怎么修改?

帅哥哟,离线,有人找我吗?
blackzhu
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
这个图表怎么修改?  发帖心情 Post By:2012/11/24 16:19:00 [显示全部帖子]

Dim Chart As WinForm.Chart
Chart= e.Form.Controls("Chart1")
Chart.SeriesList.Clear()
Chart.ChartType = ChartTypeEnum.Gantt
Chart.Inverted = True '对调X轴和Y轴位置
Chart.AxisY.DateType= True 'Y轴为日期型
Chart.AxisY.AnnoFormatString = "yyyy-MM-dd" '设置Y轴的标示格式
For Each dr As DataRow In DataTables("订单明细表").DataRows
    Chart.AxisY.MinDate = dr("下单日期")
    Chart.AxisY.MaxDate = dr("交货日期")
    Chart.AxisX.GridMajorVisible = False '隐藏X轴的网格线
    With Chart.SeriesList
        .AddGanttSeries(dr("加工工序"),dr("开始时间"),Date.Today)
        .AddGanttLabels("yyyy年M月d日")
    End With
Next

 

  竖向为加工工序  横向为下单日期和结束日期   图表为开始时间 和目前的时间  这个不出来图表  怎么修改?


 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2012/11/24 16:40:00 [显示全部帖子]

     老大 我如果抛开这个(因为是局域网的SQL不好传),我有一个加工工序列  有下单日期 和交货期日列

 

 

     如果我想在横向显示加工工序   为 下单日期和交货日期   图表显示的是 加工工序目前的进度  这么写这个图表?


 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2012/11/24 16:56:00 [显示全部帖子]

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:甘特图.foxdb


 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2012/11/24 17:22:00 [显示全部帖子]

老大 有无帮我弄好!  我的要求改了!
[此贴子已经被作者于2012-11-24 17:22:55编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2012/11/24 17:42:00 [显示全部帖子]

一周内的代码这样写代码?

 

日期 >= '" & date.today.Adddays(-7) & and 日期='" & date.today & "'"


 回到顶部