[Resolvido] Access 2013, como formatar campo para ano numa tabela?

[nioxys]

Olá

Não sei se isso pode ser feito com os formatos de data do próprio Access, uma vez que ao introduzires 13, pode ser 2013, 1913, 2113, etc.

Podes contornar isso através de VBA, crias o campo "Ano" como texto e quando colocares o campo num formulário por exemplo, trabalhas sobre o evento "Depois de actualizar" desse mesmo campo, fazendo o seguinte,

Código:

Me.ano.Value = "20" & Me.ano.Value

Sempre que introduzires 13, o valor apresentado e guardado é 2013, o mesmo para 14.

Esta forma de fazer as coisas tem alguns riscos, por exemplo, se alguém introduzir 2014 o resultado será 202014. 

Para evitar isto tens de testar o que o utilizador introduz. 

Assim de repente,

Código:

Private Sub ano_AfterUpdate()

If Len(ano.Text) = 2 Then

Me.ano.Value = "20" & Me.ano.Value

End If

End Sub

Caso seja introduzido 14, o resultado é 2014, caso introduzam 2014 o resultado é 2014.

Esta é uma forma, pode haver outra...