Hola, la fecha acrodate que siempre va en formato ingles ya que usas el lenguaje SQL para hacer la consulta a la base de datos, como lo hicistes esta muy bien, tb podes usar:
Dim Fch as date
'Acordate de q sea date la variable y el campo de la BD
fch = format(txtfecha, "mm/dd/yy")
de esta forma das vuelta la fecha sin descomponer
saludos
Andrés
