Elapsed Ticks : Date « Date Time « VB.Net Tutorial

1. VB.Net Tutorial
2. Date Time
3. Date

Public Class Tester
    Public Shared Sub Main
        Dim ticksBefore As Long
        Dim ticksAfter As Long
        Dim tickSeconds As Double

        ticksBefore = Now.Ticks
        MsgBox("Press OK to see elapsed seconds")
        ticksAfter = Now.Ticks

        tickSeconds = (ticksAfter - ticksBefore) / 10000000.0
        Console.WriteLine("Elapsed seconds: " & tickSeconds.ToString())

    End Sub

End Class

Elapsed seconds: 0.6875