DateTimeFormatInfo.ShortDatePattern Property
[ This article is for Windows Phone 8 developers. If you’re developing for Windows 10, see the latest documentation. ]
Gets or sets the custom date and time format string for a short date value, which is associated with the "d" standard format string.
Assembly: mscorlib (in mscorlib.dll)
Property Value
Type: System.StringThe custom format string for a short date value, which is associated with the "d" standard format string.
| Exception | Condition |
|---|---|
| ArgumentNullException | An attempt was made to set the property to Nothing. |
| InvalidOperationException | The DateTimeFormatInfo object is read-only. |
The following example displays the value of the ShortDatePattern property and the value of a date formatted using the ShortDatePattern property for a few cultures.
Imports System.Globalization Public Class Example Public Shared Sub Demo(outputBlock As System.Windows.Controls.TextBlock) outputBlock.FontFamily = New System.Windows.Media.FontFamily("Courier New") Dim cultures() As String = { "en-US", "ja-JP", "fr-FR" } Dim date1 As Date = #05/01/2011# outputBlock.Text += String.Format(" {0,7} {1,19} {2,10}", "CULTURE", "PROPERTY VALUE", "DATE") outputBlock.Text += vbCrLf + vbCrLf For Each culture As String In cultures Dim dtfi As DateTimeFormatInfo = (New CultureInfo(culture)).DateTimeFormat outputBlock.Text += String.Format(" {0,7} {1,19} {2,10}", culture, dtfi.ShortDatePattern, date1.ToString("d", dtfi)) + vbCrLf Next End Sub End Class ' The example displays the following output: ' CULTURE PROPERTY VALUE DATE ' ' en-US M/d/yyyy 5/1/2011 ' ja-JP yyyy/MM/dd 2011/05/01 ' fr-FR dd/MM/yyyy 01/05/2011
The following example modifies the ShortDatePattern property of a DateTimeFormatInfo object that represents the formatting conventions of the English (United States) culture. It also displays a date value twice, first to reflect the original ShortDatePattern property and then to reflect the new property value.
Imports System.Globalization Module Example Public Sub Demo(ByVal outputBlock As System.Windows.Controls.TextBlock) Dim dtfi As DateTimeFormatInfo = (New CultureInfo("en-US")).DateTimeFormat Dim date1 As DateTime = #5/1/2011# outputBlock.Text &= "Original Short Date Pattern:" & vbCrLf outputBlock.Text += String.Format(" {0}: {1}", dtfi.ShortDatePattern, date1.ToString("d", dtfi)) & vbCrLf dtfi.ShortDatePattern = "yyyy/MM/dd" outputBlock.Text &= "Revised Short Date Pattern:" & vbCrLf outputBlock.Text += String.Format(" {0}: {1}", dtfi.ShortDatePattern, date1.ToString("d", dtfi)) & vbCrLf End Sub End Module ' The example displays the following output: ' Original Short Date Pattern: ' M/d/yyyy: 5/1/2011 ' Revised Short Date Pattern: ' YYYY/MM/dd: 2011/05/01