usando data com o objeto=Data()[resolvido]

Primeira duvida.
como eu fasso para criar uma caixa de texto com a variavel date.

preciso faZer isso para quando eu clicar  em um botão mostrar a mensagem da diferença de datas entre as duas
caixas de data texto.

exemplo:

textbox1 - textbox2

botão ok.

retorna a mensagem em dias.


segunda duvida. Ja vi os exemplos do forum.

agora eu gostaria de saber se via codigo, quando eu informar dentro do objeto =Data()-5 ele vai me retornar a data de hoje menos 5 dias. Como eu poderia fazer via,codigo q i sistema entende-se que a cada dia primeiro do mes um outro campo texto data entende-se que ele deve ser 30 dias de diferença do outro?

Olá, não precisa necessariamente criar a caixa com a data atual, basta isso no evento ao clicar do botão:

Dim Msg As String
Msg = "Temos: " & DateDiff("d", CampoData, Date) & " dias"
MsgBox Msg

Valeu!

Mas eu não consegui fazer ele tirar a diferença de data de um campo para o outro.

Ele mostrar acho 417225! dias


se eu colocar na msg isso: DateDiff("d", Now, DataIn)

ele vai me retornar a data informada menos a data de hoje em dias.


a questão é como colocar o textbox como :

text1,text2 as date

DateDiff("d", Now, text1)

para mim capturar os valores de datas pela caixa de texto;

o que preciso fazer?

Amigo, não é a diferença entre uma data digitada e a data de hoje que desejas obter? Faz o teste nesse pequeno exemplo.

valeu Beto.

Esqueceste do resolvido.
http://maximoaccess.forumeiros.com/t860-resolucao-de-topicos