Skip to main content

AccessTr.neT


ileriye doğru sayan kronometre

ileriye doğru sayan kronometre

Çözüldü #1
Arkadaşlar merhaba
Sizlerden ricam ekte örnek dosyamda basit bir kronometre yapımı konusunda desteğinizi rica edeceğim.
başlat butonuna basılınca geçen zamanın görüntülenmesini istiyorum.
şimdiden cevaplayacak arkadaşlara teşekkürlerimi sunarım.

kronometre.rar
karabattak, 28-12-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #2
İnceleyiniz.
[email protected]
komşuda dülger mi var geliyor keser sesi,
ustalar konuşunca çıraklar keser sesi.
Cevapla
Çözüldü #3
ekteki örnek işinizi görür umarım

kronometre.rar


(30/04/2012, 16:08)Kur@l yazdı: İnceleyiniz.
[email protected]

pardon kur@l hocam mesajınızı görmedim...
Son Düzenleme: 30/04/2012, 16:09, Düzenleyen: perisanoglu.
Cevapla
Çözüldü #4
(30/04/2012, 16:08)Kur@l yazdı: İnceleyiniz.
[email protected]

Kural hocam cevabınız için teşekkür ederim.
yalnız form açıldığında süre saat kaçsa örneğin 16:44 ise süre 44. dakikadan devam ediyor
form açıldığında süre 00:00 olarak dursa başlata basınca süre başlasa.
bunun için ne gibi bir değişiklik yapmak gerekir.

tekrar teşekkür ederim.
karabattak, 28-12-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #5
Teşekkürler, güzel örnek.

form_timer olayının en üstüne

if isnull(sure)=true then exit sub
işlem tamam.
komşuda dülger mi var geliyor keser sesi,
ustalar konuşunca çıraklar keser sesi.
Cevapla
Çözüldü #6
(30/04/2012, 16:45)Kur@l yazdı: Teşekkürler, güzel örnek.

form_timer olayının en üstüne

if isnull(sure)=true then exit sub
işlem tamam.

Kural hocam
kodu böyle yaptım

Private Sub Form_Timer()
If IsNull(sure) = True Then Exit Sub
On Error Resume Next
Debug.Print sure, Format(Time() - sure, "Nn"), Format(Time() - sure, "Ss")
Me.dakika.Caption = Format(Time() - sure, "Nn")
Me.saniye.Caption = Format(Time() - sure, "Ss")
Me.Etiket12.Caption = Format(Right(Timer, 2), "00")
Me.TimerInterval = 100
End Sub

ama bir değişiklik olmadı yanlış yeremi yazdım acaba
karabattak, 28-12-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da