Aşağıdaki linkte Hayri16 Hocamla çözdüğümüz saat toplamları çalışması var.
https://accesstr.net/konu-saat-farkini-o...nmasi.html

ancak bunu bir adım ileri götürüp form içindeki iki açılan kutu yardımıyla sonuca saat olarak toplatma konusunda yardma ihiyaç duyuyorum. Sadeleştirilmiş dosyam ektedir.

kod olarak

Private Sub aykut_Click()

Dim ilktop As Integer

Dim sontop As Integer

ilktop = Nz(DSum("LEFT(TOPLAM_SEYIR_SURESI,2)", "[TBL_SEYIR_SURESI]", "[GOREV]= '" & [aykut] & "'"), 0)

sontop = Nz(DSum("mid(TOPLAM_SEYIR_SURESI,4,2)", "[TBL_SEYIR_SURESI]", "[GOREV]= '" & [aykut] & "'"), 0)

sefto = ilktop & ":" & sontop



End Sub

kullanmıştık ancak bu sefer toplam referans olan iki açılan kutu var?