Se per...
come posso fare per ottenere il formato giusto per "MySQL" e cioe'"aaaammgg" ???
...intendi sapere come ottenere direttamente la data allora non ti sono d'aiuto. Se però vuoi passare dal tuo risultato a quello che ti occorre ti basta lavorare sulle stringhe:
codice:
Dim Stringa1 As String
Dim Stringa2 As String
Dim PosSegno1 As Byte
Dim PosSegno2 As Byte

Stringa1 = "gg/mm/aaaa"

PosSegno1 = InStr(1, Stringa1, "/", vbTextCompare)
PosSegno2 = InStr(PosSegno1 + 1, Stringa1, "/", vbTextCompare)

Stringa2 = Right$(Stringa1, Len(Stringa1) - PosSegno2) & _
           Mid(Stringa1, PosSegno1 + 1, PosSegno2 - 1 - PosSegno1) & _
           Mid(Stringa1, 1, PosSegno1 - 1)
Non sono sicuro di aver capito...

Ciao!