请教老师，下面代码，对时间的计算精确性不足，比如 计划开始时间是2016-08-01 计划完成时间是2016-08-01 ，实际完成时间是2016-08-01 20:00
得到的计算：任务天数是 0 任务效率是 -0.83 我想得到的计算结果应该是 任务天数 是1 任务效率是 0.17 （提前17%的时间完成）
如果计划开始时间和计划完成时间 不是设置成DATETIME 这样的情况应该怎样调整精确性
Select Case e.DataCol.name '设计实际完成时间计算
Case "计划完成时间","实际完成时间","计划开始时间"
Dim dr As DataRow = e.DataRow
If dr.IsNull("计划完成时间") Or dr.IsNull("实际完成时间") Then
dr("任务效率") = Nothing
Else
Dim tp As TimeSpan = dr("计划完成时间") - dr("实际完成时间")
dr("任务效率") = tp.Totaldays '真正的时段型数据要转换为秒数,才能存入时段列
End If
Dim dr1 As DataRow = e.DataRow
If dr1.IsNull("计划开始时间") Or dr1.IsNull("计划完成时间") Then
dr1("任务天数") = Nothing
Else
Dim tp1 As TimeSpan = dr1("计划完成时间") - dr1("计划开始时间")
dr1("任务天数") = tp1.Totaldays '真正的时段型数据要转换为秒数,才能存入时段列
End If
End Select
加好友 
发短信
Post By：2016/8/4 17:46:00 [只看该作者]
