Mega Code Archive

 
Categories / VB.Net / Date Time
 

Create DateTime structure to the specified year, month, day, hour, minute, and second for the specified calendar

Imports System.Globalization Imports System.Text.RegularExpressions Imports System.Threading Module Example    Public Sub Main()       Dim persian As New PersianCalendar()       Dim date1 As New Date(2010, 5, 27, 16, 32, 0, persian)       Console.WriteLine(date1.ToString())       Console.WriteLine("{0}/{1}/{2} {3}{6}{4:D2}{6}{5:D2}", persian.GetMonth(date1), _                                        persian.GetDayOfMonth(date1), _                                        persian.GetYear(date1), _                                        persian.GetHour(date1), _                                        persian.GetMinute(date1), _                                        persian.GetSecond(date1), _                                        DateTimeFormatInfo.CurrentInfo.TimeSeparator)    End Sub End Module