Olá Pessoal,

Tenho dois campos de formulário que recebem uma Data Inicial qdo ocorre a abertura do formulário e outro que recebe a Data Final como evento qdo um Botão de Ação recebe um clique, porém tenho tbem um campo chamado Duração que  calcula o tempo de duração entre a Data Inicial e Data Final, coloquei o código abaixo, porém ele está retornando um valor Científico, como posso fazer para que ele demonstre em formato de Hora???

Private Sub Duração_GotFocus()
Duração.Text = (Hora_Final - Hora_Inicial)

End Sub

Private Sub FINALIZAR_Click()
Hora_Final.SetFocus
End Sub
Private Sub Hora_Final_GotFocus()
Hora_Final.Text = Time()
Duração.SetFocus
End Sub

Se alguém puder me ajudar.....

Valeu.