Module Example
Public Sub Main()
Dim dTime As Date = #8/5/1980#
Dim tSpan As New TimeSpan(17, 4, 2, 1)
Dim result1, result2 As Date
result1 = Date.op_Addition(dTime, tSpan)
result2 = dTime + tSpan
End Sub
End Module