עזרה בTimer דחוף!!!

nivhar

New member
עזרה בTimer דחוף!!!

שלום, אני רוצה לדעת איך לעשות שטיימר יציג על לייבל שעה לא אמיתי כלומר אני יודע איך מציגים שעה אמיתית שכתובה במחשב אך אני רוצה להציג שעה שתחיל נגיד ב8:00 ותעלה כל שנייה בשנייה איך עושים זאת?
 

shai_shai_shai

New member
תשובה

תראה תשים ב form את הדברים האלה: תיבת טקסט טימר. עכשיו תרשום ככה: בכותרץ בלי שום קשר לכלום תקבע כמה דברים: Dim tinseconden As Integer Dim minuten As Integer Dim seconden As Integer בוא נגיד שלתיבת טקסט קוראים txttime בתוך הטיימר תרשום ככה: private sub timer1_timer() Dim min As Integer Dim sec As Integer min = tinseconden \ 60 sec = tinseconden - (min * 60) If sec = "-1" Then sec = "0" end sub TxtTime.Text = min & ":" & sec
 
למעלה