主题：代码冲突

没看到你上面写的什么意思，上传具体实例，说明如何操作表，要做到什么效果。

写了一大堆，完全没看懂你想表达什么。上传具体实例，说明哪个表哪行输入什么，最后要什么效果。

 上传具体项目，说明操作步骤，说明最后的效果。

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:甘特图.table

Select Case e.DataCol.Name
    Case "下周工作计划"
        Dim fdr As DataRow = e.DataTable.Find("附加列 = " & e.DataRow("_Identify"))
        If fdr IsNot Nothing Then
            systemready = False
            fdr("事件类型") = e.DataRow("事件类型")
            fdr("项目名称") = e.DataRow("项目名称")
            fdr("项目内容") = e.DataRow("项目内容")
            fdr("状态") = e.DataRow("状态")
            fdr("本周工作目标") = e.DataRow("下周工作计划")
            systemready = True
        End If
    Case "状态"
        If e.DataRow("状态") = "办理中" Then
            e.DataRow("进行_开始日期") = Date.Now
        ElseIf e.DataRow("状态") = "已完成" Then
            e.DataTable.ReplaceFor("进行_完成日期", Date.Now, "项目名称 = '" & e.DataRow("项目名称") & "' and 进行_开始日期 is not null")
        End If
End Select