Skip to main content

AccessTr.neT


Saat Formatında Yazan Saat Ve Dakikatı Saniyeye Çevirme

Saat Formatında Yazan Saat Ve Dakikatı Saniyeye Çevirme

Çözüldü #1
Sayın hocalarım,
ekli seruz hocamın yapmış olduğu örnekte gün ve saat farkını buluyor benim yapmak istediğim saat formatında olan saat ve dakikayı sayı formatında saniyeye çevirmek istiyorum.

Saygılarımla,
.rar dakikayı_saniyeye.rar (Dosya Boyutu: 23,04 KB | İndirme Sayısı: 6)
Ahmet Yenginoğlu
Cevapla
#2
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. Img-grin
İ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
Cevapla
#3
(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. Img-grin
İ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.
Ahmet Yenginoğlu
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task