Una modalità, per ottenere il formato da te richiesto della data, è quella di usare la funzione stringa "Format()".
Mostriamo per esempio la data odierna secondo la formattazione da te indicata:
Public Sub Main()
Print Format(Now, "dd/mm/yyyy")
End
...mi da errore (e anche se cerco di convertirla in data con CDate)
Ho però appena trovato la soluzione .....con la funzione VAL che converte anche date oltre che stringhe.
...
E' un pò barocco ma funziona.
La funzione CDate() accetta solo il formato data: mese/giorno/anno, non tenendo essa in considerazione la localizzazione corrente.
Ad ogni modo, puoi un pochino abbreviare la riga di codice così usando la funzione CDate():
Public Sub Main()
Print CDate(Val("18/12/2014"))
End