Foxtable(狐表)用户栏目专家坐堂 → [求助]甘特图绘制。


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

主题:[求助]甘特图绘制。

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


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
[求助]甘特图绘制。  发帖心情 Post By:2015/4/25 16:35:00 [显示全部帖子]

按照教程中的“编码绘制甘特图”,出现了调用目标错误的提示,

 

错误所在事件:表,项目任务明细表窗口_Table2,DrawCell
详细错误信息:
调用的目标发生了异常。
从字符串“第一列”到类型“Date”的转换无效。

 

同时 在该窗口的afterload事件中加入代码,(代码见教程),系统提示“不存在项目任务明细表窗口_Table2,”


[此贴子已经被作者于2015/4/25 16:42:01编辑过]

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


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
  发帖心情 Post By:2015/4/25 16:55:00 [显示全部帖子]

drawcell代码:

 

If DrawGannt Then
    Dim r As Row  = Tables("任务明细表").Rows(e.Row.Index)
    Dim dt1 As Date = r("开始时间")
    Dim dt2 As Date = r("结束时间")
    Dim dt As Date = e.Col.Name.Replace("年","-").Replace("月_","-")
    If dt>=dt1 AndAlso dt<=dt2 Then
        e.StartDraw()
        If dt < Date.Today Then
            e.Graphics.FillRectangle(Brushes.Green,e.x ,e.y + 5, e.Width, e.Height - 10)
        Else
            e.Graphics.FillRectangle(Brushes.Red,e.x ,e.y + 3, e.Width, e.Height - 7)
        End If
        e.EndDraw()
    End If
End If


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


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
  发帖心情 Post By:2015/4/25 16:59:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:无标题3.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
  发帖心情 Post By:2015/4/25 17:08:00 [显示全部帖子]

bin:

 

那句代码的意思,就是说:将开始时间和结束时间这个两个列进行转换,对吗?我的“任务明细表”中这两个列均为日期列啊

[此贴子已经被作者于2015/4/25 17:07:59编辑过]

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


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
  发帖心情 Post By:2015/4/25 17:10:00 [显示全部帖子]

控件名为“table2”

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


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
  发帖心情 Post By:2015/4/25 17:27:00 [显示全部帖子]

老大啊,都是大写的,应该没有问题啊,我想再笨的话,有些基本的东西我还是不会出错的,到底怎么回事呢?

 

 

还有,上面提到的所谓第一列,应该指的是table2的第一列吗?


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


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
  发帖心情 Post By:2015/4/25 17:37:00 [显示全部帖子]

另外:在教程中关于三个内部函数,一个提到datatables("窗口1_Table2"),其他两个提到tables("窗口1_Table2"),有何区别?

 回到顶部