First we set the initial DateTime variable as follows:
Dim dtNow As DateTime = DateTime.Now
Now we can use this variable to manipulate today’s date to give us the exact format that we need.
| 6/25/2008 |
| litDate.Text = dtNow.Date |
| 6/25/2008 |
| litToday.Text = dtNow.Today |
| 6/25/2008 |
| litToShortDateString.Text = dtNow.ToShortDateString |
| 8:26 AM |
| litToShortTimeString.Text = dtNow.ToShortTimeString |
| Wednesday, June 25, 2008 |
| litToLongDateString.Text = dtNow.ToLongDateString |
| 8:26:46 AM |
| litToLongTimeString.Text = dtNow.ToLongTimeString |
| 6/25/2008 1:26:46 PM |
| litToUniversalTime.Text = dtNow.ToUniversalTime |
| 177 |
| litDayOfYear.Text = dtNow.DayOfYear |
| 3 |
| litDayOfWeek.Text = dtNow.DayOfWeek |
| 6 |
| litDay.Text = dtNow.Month |
| 25 |
| litDay.Text = dtNow.Day |
| 2008 |
| litDay.Text = dtNow.Year |
| 6/26/2008 8:26:46 AM |
| litAddDays.Text = dtNow.AddDays(1) |
| 6/25/2008 9:26:46 AM |
| litAddHours.Text = dtNow.AddHours(1) |
| 6/25/2008 8:26:56 AM |
| litAddMilliseconds.Text = dtNow.AddMilliseconds(10000) |
| 6/25/2008 8:27:46 AM |
| litAddMinutes.Text = dtNow.AddMinutes(1) |
| 7/25/2008 8:26:46 AM |
| litAddMonths.Text = dtNow.AddMonths(1) |
| 6/25/2008 8:26:47 AM |
| litAddSeconds.Text = dtNow.AddSeconds(1) |
| 6/26/2008 12:13:26 PM |
| litAddTicks.Text = dtNow.AddTicks(1000000000000) |
| 6/25/2009 8:26:46 AM |
| litAddYears.Text = dtNow.AddYears(1) |
| 6/24/2008 8:26:46 AM |
| litAddNegDays.Text = dtNow.AddDays(-1) |
| 6/25/2007 8:26:46 AM |
| litAddNegYears.Text = dtNow.AddYears(-1) |
June 25, 2008
Posted by bjornwilliams |
DATE Manipulation |
Leave a Comment