Mostrar una fecha en formato gregoriano extendido

La norma Internacional ISO 8601:2004 específica las representaciones numéricas de la fecha y hora. Esta notación estándar ayuda a evitar la confusión en la comunicación internacional causada por diferentes notaciones nacionales y se aumenta la portabilidad de las interfaces de usuario de la computadora

Para más información ver:

El estándar internacional para la notación de la fecha Gregoriana es:

Formato básico YYYYMMDD Ejemplo 19850412
Formato extendido YYYY-MM-DD Ejemplo 1985-04-12

El código que se muestra a continuación devuelve una cadena que contiene una fecha formateada en el formato extendido de la fecha gregoriana

El código no comprueba si la fecha es buena o no, solo formatea la fecha.

''' <summary>
'''   Formatear una fecha (solo la fecha) según el formato 
'''   extendido para la fecha gregoriana (YYYY-MM-DD Ejemplo 1985-04-12)
'''   definido en la norma Internacional ISO 8601:2004 que específica  
'''   las representaciones numéricas de la fecha y hora
''' </summary>
''' <param name="YYYY">El año</param>
''' <param name="mes">El mes</param>
''' <param name="dia">El dia</param>
''' <returns>
'''    Una cadena con el 'formato extendido' para la 'fecha gregoriana' 
'''    (YYYY-MM-DD  Ejemplo 1985-04-12)
''' </returns>
''' <remarks>
'''   <para>La norma Internacional ISO 8601:2004 específica las representaciones  </para>
'''   <para>numéricas de la fecha y hora. Esta notación estándar ayuda a evitar </para>  
'''   <para>la confusión en la comunicación internacional causada por las   </para>
'''   <para>diferentes notaciones nacionales y se aumenta la portabilidad   </para>
'''   <para>de las interfaces de usuario de la computadora.  </para>
'''   <para>http://es.wikipedia.org/wiki/ISO_8601 </para>
'''   <para>http://wapedia.mobi/es/ISO_8601 </para>
'''   <para>El estándar internacional para la notación de la fecha Gregoriana es: </para>
'''   <para>Formato básico      YYYYMMDD    Ejemplo 19850412 </para>
'''   <para>Formato extendido   YYYY-MM-DD  Ejemplo 1985-04-12 </para>
'''   <autor> Joaquin medina Serrano: joaquin@medina.name</autor>
'''   <rights> Licencia Creative Commons Compartir-Igual 3.0</rights>
'''   <Creacion>2010/08/14T10:19:00</Creacion>
'''</remarks>
Public Shared Function FormatearFechaISO8601GregorianaExtendida( _
                   ByVal YYYY As Integer, _
                   ByVal mes As Integer, _
                   ByVal dia As Integer) As String

    Dim añoAux As String = YYYY.ToString
    Dim mesAux As String = mes.ToString
    Dim diaAux As String = dia.ToString

    Do While añoAux.Length < 4
        añoAux = "0" & añoAux
    Loop
    Do While mesAux.Length < 2
        mesAux = "0" & mesAux
    Loop
    Do While diaAux.Length < 2
        diaAux = "0" & diaAux
    Loop

    Dim provider As System.IFormatProvider = Globalization.CultureInfo.CurrentCulture
    Return String.Format(provider, "{0}-{1}-{2}", añoAux, mesAux, diaAux)
End Function

Mostrar una fecha gregoriana extendida

Descripción general

[TOC] Tabla de Contenidos

Mostrar una fecha en formato gregoriano extendido

A.2.Enlaces