Imports System
Public Class CurrentTimeInSeconds_VB_NET
Public Shared Sub Main()
Dim milliseconds As Long = DateTime.Now.Ticks / TimeSpan.TicksPerMillisecond
Dim seconds As Long = milliseconds / 1000
Console.WriteLine(seconds)
End Sub
End Class
' run:
'
' 63858785130
'