1
Declarar una nueva función por debajo de la subrutina principal. Recuerde no utilizar el "SUB " tipo de módulo , ya que sólo los valores devueltos funciones.
2
declarar la función con un parámetro llamado " Número ". Esto se hará referencia por valor.
3
declare cuatro variables: una cadena y tres enteros . Los tres números enteros se utilizan para mantener los valores de la serie que se digitalizará
4
Inicializar cada uno de los tres números enteros a los valores : . S.Substring ( 0,2) , S.Substring (2,2 ) y S.Substring (4,4 ) , éstos representan el mes , día y año , respectivamente .
5
Configurar los valores de retorno se reintegrará a los nombres de las variables enteras . Por ejemplo, " Vuelva Fecha Corregido (mes , día, año ) .
6
Convierte cada número por separado en una cadena mediante una simple expresión de conversión . Por ejemplo , Cstr (Mes ) convertirá el mes en una cadena equivalente. Estos valores se pueden presentar directamente o usadas como índices de arrays para mostrar nombres tales como " diciembre".