سوال در مورد vb6 time [بایگانی]

VG123456

شنبه 26 آذر 1390, 15:15 عصر

بسمه تعالی
*-*-*-*-*-*-*

مدیران و دوستان گرامی کد زیر را مشاهده نمایید .

Private Sub Timer1_Timer()
Label1.Caption = Time - 1
End Sub

در کد بالا ساعت سیستم بر روی لیبلی نمایان می شود و 1 ثانیه 1 ثانیه از ساعت کم می شود .
می خواستم بپرسم دلیل این چیست که ثانیه ها کم میشود . (خاصیت مربوط به این را اگه میشه برام بگید .)
با تشکر !

IamOverlord

شنبه 26 آذر 1390, 15:35 عصر

غیر منطقی به نظر میاد! :متعجب:

Mr'Jamshidy

شنبه 26 آذر 1390, 19:28 عصر

بسمه تعالی
*-*-*-*-*-*-*

مدیران و دوستان گرامی کد زیر را مشاهده نمایید .

Private Sub Timer1_Timer()
Label1.Caption = Time - 1
End Sub

در کد بالا ساعت سیستم بر روی لیبلی نمایان می شود و 1 ثانیه 1 ثانیه از ساعت کم می شود .
می خواستم بپرسم دلیل این چیست که ثانیه ها کم میشود . (خاصیت مربوط به این را اگه میشه برام بگید .)
با تشکر !

غیر منطقی به نظر میاد! :متعجب:

همینطور غیر ممکن
تابع Time زمان فعلی سیستم رو در یک قالب نشون میده مثلا 7:53:12 PM از این شما نمیتونی چیزی کم کنی

مثل این میمونه که بگی از مقدار "سلام" من یک واحد یک واحد کم میکنم

VG123456

شنبه 26 آذر 1390, 19:50 عصر

بسمه تعالی
*-*-*-*-*-*

دوستان این کدی که گفتمو خودتون اجرا کنید متوجه میشید
که کد درست کار می کنه شما کد زیر را در یک Timer قرار بدید و Interval تایمر را 1000 قرار بدید و نیز یک Label روی فرم قرار بدید .

Private Sub Timer1_Timer()
Label1.Caption = Time - 1
End Sub

متوجه میشید که کد درست کار می کنه .
سوال من این بود که چه طوری این کار انجام می گیرد .
لطفا فقط جواب بدید و اسپم ندید .
با تشکر .

M.T.P

شنبه 26 آذر 1390, 21:06 عصر

در کدی که گذاشتید چون وی بی منظور از 1 رو نمیدونه ! (ثانیه ، دقیقه ، ساعت ، شبانه روز) 1 رو یک شبانه روز در نظر میگیره و مدت 24 ساعت از ساعت سیستم کم میکنه ، اما چون ساعت جاری همیشه از 24 ساعت کمتره ، باقیمانده بصورت معکوس نمایش داده میشه.

بهتره به جای استفاده از این عبارت ، از کد زیر استفاده شود:

Label1.Caption = Now - 1

VG123456

شنبه 26 آذر 1390, 21:23 عصر

بسمه تعالی
*-*-*-*-*-*
خیلی ممنون از جوابتون !