Mega Code Archive

 

Categories / VB.Net Tutorial / Date Time

 

System Time

Public Class Tester     Public Shared Sub Main         Dim rightNow As Date = Now         Dim result As New System.Text.StringBuilder         result.AppendLine("""Now""...")         result.AppendLine()         result.Append("Date: ").AppendLine(rightNow.ToShortDateString)         result.Append("Time: ").AppendLine(rightNow.ToShortTimeString)         result.Append("Ticks: ").Append(rightNow.Ticks.ToString)         Console.WriteLine(result.ToString())     End Sub End Class Now"... Date: 11/05/2007 Time: 9:09 PM Ticks: 633145145771093750