modüle aşağıdaki fonksiyonu ekleyip sorgudan çağırmayı deneyebilirsiniz

Function SureFark(BasTrh As Date, BitTrh As Date) As String

TSaniye = Abs(DateDiff("s", [BasTrh], [BitTrh]))

 

LngSn = TSaniye Mod 60

LngDk = (TSaniye \ 60) Mod 60

LngSt = (TSaniye \ 3600) Mod 60

 

SureFark = Format(LngSt, "00") & ":" & _

          Format(LngDk, "00") & ":" & _

          Format(LngSn, "00")



End Function

sorgudan çağırma

Sure: SureFark([BaslangicTarihi];[BitisTarihi])

eğer işlem yapacaksanız doğrudan datediff("s".....) ile alanan veri kaydedilip fonksiyon ona göre yeniden düzenlenebilir