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


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

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

帅哥哟,离线,有人找我吗?
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编辑过]

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/25 16:46:00 [只看该作者]

你DrawCell事件代码没写对.  代码发出来.


第二个问题你表名没写对.

 回到顶部
帅哥哟,离线,有人找我吗?
liuxianjie1980
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | 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


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/25 16:59:00 [只看该作者]

Dim dt As Date = e.Col.Name.Replace("年","-").Replace("月_","-")

出错肯定是这句代码.  你检查你的列名     如果你的列名是"第一列"  那么后面的代码操作之后 还是第一列  "第一列" 这个字符串 当然无法转换为日期.肯定会报错.

你看一下帮助的列名是什么规格的,就明白了

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


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


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

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/25 17:06:00 [只看该作者]

项目任务明细表窗口_窗口控件名    你选择那个表控件看看名称是啥

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


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

控件名为“table2”

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/25 17:14:00 [只看该作者]

大小写是区分的哦

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


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

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

 

 

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


 回到顶部
总数 11 1 2 下一页