vb'de Çalışma Zamanını bulma

[ismailayan]

Merhaba arkadaşlar....

Sorunum şu:

veritabanımda girisTarih,girisSaati ve CikisTarih,CikisSaat
alanlarım var.ve çalışma saati 08:30 ile 16:00

yapılması gereken...

Girişi yapılmış tarih ve saati çıkışı yapılmış tarih saatten çıkartacak ama çalışma saati içinde

her şekli denedim ama bir türlü beceremedim.

bu konuda bilgisi olan arkadaşların yardımına ihtiyacım var.

normal de benim uyguladığım kod aşağıda

Dim Date1 As Date
Dim Zaman1 As Date
Dim Date2 As Date
Dim Zaman2 As Date

Dim TarihFark
Dim ZamanFark

Dim Yaz
Date1 = MSFlexGrid1.TextMatrix(lRow, 1)
Zaman1 = MSFlexGrid1.TextMatrix(lRow, 2)
Date2 = MSFlexGrid1.TextMatrix(lRow, 8)
Zaman2 = MSFlexGrid1.TextMatrix(lRow, 9)

'Stop
TarihFark = Date1 - Date2
ZamanFark = Zaman1 - Zaman2

Yaz = TarihFark & ":" & Format(ZamanFark, "hh:mm")

MSFlexGrid1.TextMatrix(lRow, 10) = Yaz

------------------------------
ama burada 24 saat üzerinde işlem yapıyor...

 

[Levent Menteşoğlu]

Bir örnek dosya eklermisiniz.

 

[ismailayan]

Size projeyi göndermem gerekiyor o zaman...

msflexgrid yazan kısma manuel olarak giriş yaparsanız....
sorunu beraberce çözeriz zannediyorum...

ben önce değişkenlerle denedim ama olmadı mesela
dim Mesai1 as date
dim Mesai2 as date
dim calismasuresi as date
mesai1="08:30"
mesai2="18:00"
calismasuresi="09:30

bu şekilde denedim ama mantığı tam olarak veremedim..

bu konuda bana yardımcı olursan sevinirim.