主题：date与date的相加

此主题相关图片如下：capture.png

如图，

1是date

2是date

3是整数

 

如何在datachanged里面写代码来计算1+2。

 

1+3是比较简单的，用addhours就可以。但是在日前后面加上几点钟开始，这两个data的向加就不会了。

错了，停线结束的时刻是1+2+3

 

用 & 也报错：

If e.DataRow.IsNull("预期停线日期") Or e.DataRow.IsNull("预期停线耗时") Or e.DataRow.IsNull("预期停线时刻") Then
    e.DataRow("停线开始")= Nothing
   
Else
    'MessageBox.Show("")
    Dim a As Date=e.DataRow("预期停线日期")
Dim b As Date = e.DataRow("预期停线时刻")
Dim c As Date

e.DataRow("停线开始")=c & b
   
End If

 

代码错了。。。。。发现要加一个空格可以连接

 

e.DataRow("停线开始")=a & " " & b

 Dim a As String ="2008-12-11"
Dim b As String = "12:12"
Dim t As Date = a & " " & b
t=t.AddHours(2)
output.show(t)