[Resolvido]Último dia do ano como valor padrão

Gostaria de ajuda dos amigos do Fórum.
Tenho um campo de data(Validade) no form, como devo proceder para que este campo a cada novo registro fique como valor padrão o último dia do ano( Ex: 31/12/2015)

Sou grato pela atenção de todos.

Naldo,

No evento ao carregar do seu formulário:

Código:

seucampo = DateSerial(Year(Date), 13, 0)

Uilson Brasil

Isso mesmo que eu precisava.
Sou muito grato pela sua atenção e presteza.

Grande abraço

Naldo,

Valeu pelo retorno...

Uilson Brasil

Se se for só o ano(2015) como devo proceder

Código:

If Format(Date, "yyyy") = 2015 Then: seucampo = DateSerial(Year(Date), 13, 0)

Não deu certo, aparece desta maneira no campo 31/12/2015.