老师您好,我在用时间段函数时,标注颜色部分代码为什么总提示 “-” 号错误?
代码:
Select Case e.DataCol.name
Case "签单日期","运营进度_基础建设_开始日期","运营进度_基础建设_计划完工日期","运营进度_基础建设_实际完工日期"
e.DataRow("运营进度_基础建设_开始日期") = e.DataRow("签单日期").AddDays(1) '签单日期的第二天作为开始日期
e.DataRow("运营进度_基础建设_计划完工日期") = e.DataRow("运营进度_基础建设_开始日期").addDays(e.DataRow("运营进度_基础建设_标准工期"))
Dim Tsp1 As TimeSpan = e.DataRow("运营进度_基础建设_实际完工日期") - e.DataRow("运营进度_基础建设_开始日期") '实际工期
Dim Tsp2 As TimeSpan = Date.Today - e.DataRow("运营进度_基础建设_开始日期") '最低工期
Dim T1 As Integer = Tsp1.Days '实际工期
Dim T2 As Integer = Tsp2.Days '最低工期
If e.DataRow.Isnull("运营进度_基础建设_实际完工日期") Then
e.DataRow("运营进度_基础建设_完工标志") ="未完工"
e.DataRow("运营进度_基础建设_工期延误天数") = T2 - e.DataRow("运营进度_基础建设_标准工期")
Else
e.DataRow("运营进度_基础建设_完工标志") ="已完工"
e.DataRow("运营进度_基础建设_工期延误天数") = T1 - e.DataRow("运营进度_基础建设_标准工期")
End If
End Select