روش اضافه کردن یک ساعت ساده به فرم

چجوری یک ساعت ساده به فرم خود اضافه کنیم اگه کسی بلده ممنون میشم منم راهنمایی کنه

سلام
با اضافه كردن شي Timer و استفاده از تابع Time

با اين روشي كه ميگم انجام بديد
1- روي فرم يك شي Timer اضافه كنين و خصوصيات Interval اون رو بذارين 500
2- روي فرم يك Label بذارين
3- روي شي تايمر دو كليك كنين و درون اون اين كد بنويسين
label1.caption=timer

این چیزی که گفتید ثانیه رو نشون میده پس باید او نو بر 3600 برای تبدیل تقسیم کنم درسته

سلام
نه عزيز ثانيه رو هم نشون ميده ولي در كل براي نمايش ساعته يه تستي بكن

یه Timer رو فرم بذار. Interval شو تنظیم کن که بهتره از 1000 بیشتر نباشه. کد زیر رو تو رویداد تایمر بنویس

کد:

---

Private Sub Timer1_Timer()
Label1 = Format((Time), "HH:MM:SS")
End Sub

---

سلام

اول يك تكست باكس يا ليبل روي فرم ايجاد كن به همراه يك تايمر

بعد در قسمت پراپرتيز اينتراول تايمر رو روي 1000 بذار

بعد دو بار روي تايمر كليك كن و كد زير رو وارد كن

(text1.Text = Left(Time$, 5

سلام

اول يك تكست باكس يا ليبل روي فرم ايجاد كن به همراه يك تايمر

بعد در قسمت پراپرتيز اينتراول تايمر رو روي 1000 بذار

بعد دو بار روي تايمر كليك كن و كد زير رو وارد كن

(text1.Text = Left(Time$, 5

اين كار باعت ميشه كه ساعتت با ساعت ويندوز حركت كنه

ممنون از راهنمایی همه دوستان انجام شد