Visual Basic - CAMBIAR FORMATO DE FECHA AL GENERAR TXT

Hola colegas, se me ha presentado un problemilla ya que tengo mi base de datos (access) que contiene una serie de campos entre los cuales tenemos la fecha de nacimiento.. En mi sistema tengo un codigo que me genera una consulta y la posibilidad de migrar esa data a un formato txt que yo le establezco... Ahora bien la codificación es la siguiente que tambien espero sea de ayuda para otros colegas:
Set RstA = DATA.OpenRecordset("SELECT priape,prinom,fecnac FROM CEOBJ ")
NumeroArchivo = FreeFile
Open s For Output Shared As #NumeroArchivo
Print #NumeroArchivo, Trim("" & RstA("Priape")); Spc(16 - Len("" & RstA("Priape"))); _
Trim("" & RstA("Prinom")); Spc(16 - Len("" & RstA("Prinom"))); _
Trim("" & RstA("Fecnac")); Spc(8 - Len("" & RstA("Fecnac")))
Wend

Todo lo realiza perfectamente generando el TXT, resulta que la data que tengo en mi base de datos Access, el campo de la Fecha de Nacimiento (FECNAC) viene con el formato DD/MM/YYYY y me es necesario que en la codificación al generar el TXT me sea expresada la fecha en YYYYMMDD. Deduzco que la transformación tengo que hacerla en la siguiente instrucción pero necesito orientación para poder realizarlo ya que no he tenido exito: Trim("" & RstA("Fecnac")); Spc(8 - Len("" & RstA("Fecnac"))) Agradezco toda la ayuda prestada de antemano

Tendrías que utilizar la funcion FORMAT que ya viene con el VB. Ejemplo:

Dim FechaSinFormato as String
Dim FechaConFormato as String

FechaSinFormato = RstA("Fecnac")
FechaConFormato = Format (FechaSinFormato, "yyyy/mm/dd")

Espero que sea lo que necesitabas. Observa que es posible que en las líneas que te escribí arriba, luego de las comillas pueden existir barras invertidas que las agrega automáticamente el foro; las unicas barras que escribí yo, son las que separan el año, mes y día.

Saludos!!!