以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  某一行不能执行  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=109151)

--  作者:yangwenghd
--  发布时间:2017/11/5 22:05:00
--  某一行不能执行
能帮忙看看一下的代码吗?为什么全部都能执行,就红色的那段不能实现呢 感谢 感谢 

If e.Col.Name = "下周工作计划" Then
    If e.Table.DataTable.Find("附加列 = " & e.Row("_Identify")) Is Nothing Then
        \'If e.Row("状态") = "办理中" Then
            If e.Row("状态") = "办理中" OrElse e.Row("状态") = "等待中" Then \'为什么不对呢
            Dim nr As DataRow = e.Table.DataTable.AddNew
            nr("事件类型") = e.Row("事件类型")
            nr("项目名称") = e.Row("项目名称")
            nr("项目流程") = e.Row("项目流程")
            nr("项目内容") = e.Row("项目内容")
            nr("事件编号") = e.Row("事件编号")
            nr("重要程度") = e.Row("重要程度")
            nr("状态") = e.Row("状态")
            nr("办理人") = e.Row("办理人")
            nr("跟进项目") = e.Row("跟进项目")
            nr("本周工作目标") = e.Row("下周工作计划")  为什么就这段不能执行呢  感谢 感谢 
            nr("附加列") = e.Row("_Identify")
        End If
    End If
End If

--  作者:有点甜
--  发布时间:2017/11/5 23:29:00
--  

 你datacolchanged事件应该有代码影响。

 

 看看 http://www.foxtable.com/webhelp/scr/2218.htm