以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]drawcell事件问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=125941)

--  作者:81538475
--  发布时间:2018/10/10 11:05:00
--  [求助]drawcell事件问题

下面红色代码处总是报错。提示 “任务开始” 无法转换 为date 
可是我下面的代码应该事把没有sp 的列给排除了。为啥还是会报错呢

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20181010110322.png
图片点击可在新窗口打开查看



If Forms("进度安排").opened Then
 If Tables("xmfp").Rows.Count >0 Then
    If e.Col.name.Contains("sp") Then
       
            Dim cr As Row  = Tables("XMFP").Rows(e.Row.Index)
          
            Dim dt1 As Date = cr("任务开始")
            Dim dt2 As Date = cr("任务结束")
            
            Dim dt01 As Date = cr("提交节点1")
            Dim dt02 As Date = cr("提交节点2")
            Dim dt03 As Date = cr("提交节点3")
            Dim dt04 As Date = cr("提交节点4")
            Dim dt05 As Date = cr("提交节点5")
            Dim dt06 As Date = cr("提交节点6")
            
            
            Dim dt As Date = e.Col.Name.Replace("sp","").Replace("年","-").Replace("月_","-")
。。。。
[此贴子已经被作者于2018/10/10 11:07:17编辑过]

--  作者:有点蓝
--  发布时间:2018/10/10 11:30:00
--  
msgbox(e.Col.Name) ‘出错前这里显示的列名是什么?
Dim dt As Date = e.Col.Name.Replace("sp","").Replace("年","-").Replace("月_","-")

--  作者:81538475
--  发布时间:2018/10/10 11:45:00
--  
sp2018年10月_15
--  作者:有点蓝
--  发布时间:2018/10/10 11:49:00
--  
那不可能会提示这个错误,肯定是其他地方代码的问题
--  作者:81538475
--  发布时间:2018/10/10 12:06:00
--  
.NET Framework 版本:2.0.50727.8935
Foxtable 版本:2018.9.9.1
错误所在事件:全局表事件,DrawCell
详细错误信息:
调用的目标发生了异常。
从字符串“任务开始”到类型“Date”的转换无效。


就是说,可能问题不是在drawcell里面是吧。

--  作者:有点蓝
--  发布时间:2018/10/10 12:20:00
--  
问题肯定是在drawcell里面,但是不是1楼红色代码的问题。贴出完整代码看看
--  作者:81538475
--  发布时间:2018/10/10 12:20:00
--  
好像事合计行的问题。哪如何在drawcell里面忽略合计行呢
--  作者:有点蓝
--  发布时间:2018/10/10 13:42:00
--  
判断一下,事件第一行

if e.Row.Index = -1 then return