DateDiff in VB.net

Lidt illustrative eksempler:

Imports System
Imports Microsoft.VisualBasic

Module Main
    Sub Main()
        Dim t1 As DateTime = DateTime.Parse("02-11-2003 10:44:02")
        Dim t2 As DateTime = DateTime.Parse("04-11-2003 00:49:02")
        Dim s As String = System.DateTime.op_Subtraction(t2,t1).ToString()
        Console.WriteLine(s)
        Dim s2 As String = Cstr(Datediff ("h","02-11-2003 10:44:02","04-11-2003 00:49:02"))
        Console.WriteLine(s2)
        Dim s3 As String = System.DateTime.op_Subtraction(t2,t1).TotalHours.ToString()
        Console.WriteLine(s3)
    End Sub
End Module

Hej Arne,

Jeg vil faktisk væk fra VB6. Jeg vil gerne benytte udelukkende .net frameworket. Jeg kan ikke se pointen med at blande VB6 og .net frameworket sammen.
På forhånd tak.

Hilsen,
Sarid

Jeg har nemlig fjernet referencerne til Microsoft.VisualBasic for udelukkende at benytte .net. Jeg prøver dit s3.forslag. Mange tak!

Dim Int_Days As Integer

Int_Days = CType(System.DateTime.op_Subtraction(t1, System.DateTime.Now).TotalDays, Integer)

Mange tak Arne!

Så vil jeg ligge et svar

Lukke tid ?

??