Formatando Data

[Jonathan Fernando Filman 0]

Olá pessoal gostaria da ajuda de vocês para criar uma PROCEDURE onde formata uma data para receber somente

o ano.

 

Para que preciso?

 

Bom para colocar no caption dos forms para que fique da seguite mameira

 

Private sub Form_Load()

Dim Data

Data = "Nome_da_Procedure_Criada"

 

mdiprinc.caption = "Calculos Substituitário - Nome_da_empresa " & Data

 

 

Tem como fazer isso ou não?

 

Mais uma coisa como coloco caracteres especiais EX.

 

& copy

& reg

 

no HTML

 

fica um C circulado

e um R circulado

 

Como fazer isso

 

Agradeço

 

 

Jonathan

[scorpio 7]

Jonathan Fernando Filman,

 

Pra você formatar a data somente com aano, faça assim:

MsgBox(Format(Now(),"yyyy"))

Não entendi muito bem o que você precisa.

 

 

Até mais