[Resolvido]Como inserir uma Formatação de Data no campo

Bom Dia a todos

Por gentileza, eu fiz um campo Data de Abertura, que possa clicar duas vezes e ira apresentar no campo a data que foi efetuado o cadastro, só que aparece a data no campo da seguinte forma: 30/12/1899, verifiquei no painel do windows a configuração esta correta, somente esta apresentando dessa maneira no campo.

Fiz dessa maneira no evento(ao clicar duas vezes):

Private Sub DataAberturaFicha_DblClick(Cancel As Integer)
Me.DataAberturaFicha = Time()
End Sub

Obrg a todos que postarem no auxilio, grato

ola,

segue

me.seucampo = Format(Now, "dd/mm/yyyy")

Fico grato pelo código acabei de inserir e testei, funcionando perfeitamente, parabéns noisnafita, abraço

blz!

não esquece de fechar como resolvido!

sds.

Boa Noite, Obrg pelas orientações, abraço