EXTRAIR DIAS DA DATA USANDO TEXTBOX

[alberto_acm]

BOM DIA,

ESTOU PRECISANDO DO GODIGO PARA CALCULAR DIFENÇA DE DATAS EM TEXTBOX,

SEI QUE É FEITO DE DATEDIFF, MAIS MÃO ESTOU CONSEGUINDO FAZER O GODIGO;

EXEMPLO: TENHO UMA PLANILHA COM DATAS, E QUERIA QUE ELAS ME RETORNA-SE EM UM TEXTBOX.

TEXBOX_DATAENTRADA

TEXBOX_DATA VISTORIA

TEXBOX_RESULTADO

COMO FICARIA O CODIGO NO TEXBOX RESUTADO?

AGRADEÇO A AJUDA

[zinhovba]

Boa noite!!!!

Imagine o seguinte....e você tem TextBox1,TextBox2,TextBox3 e um botão "Resultado".

O que fazer para digitar na TextBox1, a Data Inicial e na TextBox2, Data Final, e ao apertar o botão o resultado sair na TextBox3

Private Sub resultado_Click()
    Dim resultado
    resultado = DateDiff("d", Me.TextBox1, Me.TextBox2)
    Me.TextBox3.Text = CStr(resultado)
       
End Sub