VB.Net Tutorial/Date Time/Date Parse — различия между версиями
Admin (обсуждение | вклад) м (1 версия) |
Admin (обсуждение | вклад) м (1 версия) |
(нет различий)
|
Текущая версия на 15:54, 26 мая 2010
Содержание
Parse Date
<source lang="vbnet">Public Class Tester
Public Shared Sub Main Dim dateParse As Date = Date.Parse("December 25, 2007")
Console.WriteLine(dateParse) End Sub
End Class</source>
25/12/2007 12:00:00 AM
Parse Date: 59
<source lang="vbnet">Public Class Tester
Public Shared Sub Main Dim testDate As String Dim results As New System.Text.StringBuilder " ----- Test a standardized date and time. testDate = "2007-07-04T23:59:59" If (IsDate(testDate) = True) Then _ results.AppendLine(Date.Parse(testDate).ToString) Console.WriteLine(results.ToString()) End Sub
End Class</source>
04/07/2007 11:59:59 PM
Parse Date: 59Z
<source lang="vbnet">Public Class Tester
Public Shared Sub Main Dim testDate As String Dim results As New System.Text.StringBuilder " ----- Test another standardized UTC date and time. testDate = "2007-07-04T23:59:59Z" If (IsDate(testDate) = True) Then _ results.AppendLine(Date.Parse(testDate).ToString) Console.WriteLine(results.ToString()) End Sub
End Class</source>
04/07/2007 4:59:59 PM
==Parse Date: /td>
<source lang="vbnet">Public Class Tester
Public Shared Sub Main Dim testDate As String Dim results As New System.Text.StringBuilder " ----- Test a time. testDate = "23:57:58" If (IsDate(testDate) = True) Then _ results.AppendLine(Date.Parse(testDate).ToString) Console.WriteLine(results.ToString()) End Sub
End Class</source>
11/05/2007 11:57:58 PM
Parse Date: December 7, 2007
<source lang="vbnet">Public Class Tester
Public Shared Sub Main Dim testDate As String Dim results As New System.Text.StringBuilder " ----- Test a date. testDate = "December 7, 2007" If (IsDate(testDate) = True) Then _ results.AppendLine(Date.Parse(testDate).ToString) Console.WriteLine(results.ToString()) End Sub
End Class</source>
07/12/2007 12:00:00 AM
Parse Date: Feb 3, 2007
<source lang="vbnet">Public Class Tester
Public Shared Sub Main Dim testDate As String Dim results As New System.Text.StringBuilder
testDate = "Feb 3, 2007" If (IsDate(testDate) = True) Then _ results.AppendLine(Date.Parse(testDate).ToString) Console.WriteLine(results.ToString()) End Sub
End Class</source>
03/02/2007 12:00:00 AM