Dim t1 As DateTime
Dim t2 As DateTime = System.DateTime.Parse(e.Item.Cells(1).Text)
If e.Item.Cells(10).Text = "" Then
t1 = System.DateTime.Parse(Now)
Else
t1 = System.DateTime.Parse(e.Item.Cells(10).Text)
End If
Dim t3 As TimeSpan
t3 = t1 - t2 '此处显示:运算符“-”不是为类型“date”定义
Dim t2 As DateTime = System.DateTime.Parse("2007-1-1") t1 = System.DateTime.Parse(Now)
Dim t3 As TimeSpan
t3 = t2.Subtract(t1)