13/01/2018, 18:27
Saat Formatında Yazan Saat Ve Dakikatı Saniyeye Çevirme
14/01/2018, 00:41
direnist
Merhaba;
saatim2 güncelleştirme sonrası (AfterUpdate) olay yordamındaki kodları aşağıdakiler ile değiştirip dener misiniz?
Module de yazılı olup sorguda kullanılan fonksiyonu çözemedim. Bende zaten sonuç olarak gelen saat değeri üzerinden saati 3600 dakikayı da 60 ile çarptırıp Metin37 ye toplamını aldırdım.
Umarım doğrudur.
İyi çalışmalar.
saatim2 güncelleştirme sonrası (AfterUpdate) olay yordamındaki kodları aşağıdakiler ile değiştirip dener misiniz?
Module de yazılı olup sorguda kullanılan fonksiyonu çözemedim. Bende zaten sonuç olarak gelen saat değeri üzerinden saati 3600 dakikayı da 60 ile çarptırıp Metin37 ye toplamını aldırdım.
Umarım doğrudur.
Dim s1, d1
Me.Refresh
Me.topsurem = Dlookup ("[topsuresi]", "sureyaz", "[Kimlik]=" & Me.Kimlikim)
s1 = Left(Me.topsurem, 2) * 3600
d1 = Mid(Me.topsurem, InStr(1, Me.topsurem, ":") + 1, 2) * 60
Me.Metin37 = s1 + d1
14/01/2018, 13:09
yenginoglu
(14/01/2018, 00:41)direnist yazdı: Merhaba;
saatim2 güncelleştirme sonrası (AfterUpdate) olay yordamındaki kodları aşağıdakiler ile değiştirip dener misiniz?
Module de yazılı olup sorguda kullanılan fonksiyonu çözemedim. Bende zaten sonuç olarak gelen saat değeri üzerinden saati 3600 dakikayı da 60 ile çarptırıp Metin37 ye toplamını aldırdım.
Umarım doğrudur.İyi çalışmalar.
Dim s1, d1
Me.Refresh
Me.topsurem = Dlookup ("[topsuresi]", "sureyaz", "[Kimlik]=" & Me.Kimlikim)
s1 = Left(Me.topsurem, 2) * 3600
d1 = Mid(Me.topsurem, InStr(1, Me.topsurem, ":") + 1, 2) * 60
Me.Metin37 = s1 + d1
Sayın direnist
İlginiz için çok teşekkür ederim. Sorunum çözülmüştür.
Saygılarımla.