Select Case e.DataCol.Name
Case "需求号","站点名称","工单类型","工单状态","审核"
If e.DataRow.IsNull("需求号")=false andalso e.DataRow.IsNull("站点名称")=false andalso e.DataRow.IsNull("工单类型")=false
dim s as string = nothing
if e.DataRow("工单状态")="已完成" andalso e.DataRow("审核")="审核通过" then
s = "已完成"
end if
datatables("任务执行进度").replacefor(e.DataRow("工单类型"), s ,"需求号='" & e.DataRow("需求号") & "' and 站点名称='" & e.DataRow("站点名称") & "'")
end if
End Select
加好友 
发短信
Post By：2021/3/5 15:39:00 [显示全部帖子]
