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.

İnceleyiniz.

ekteki örnek işinizi görür umarım

---

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

[email protected]

pardon kur@l hocam mesajınızı görmedim...

(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.

Teşekkürler, güzel örnek.

---

form_timer olayının en üstüne

if isnull(sure)=true then exit sub 

işlem tamam.

(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