نمایش ساعت [بایگانی]

nasiiiiiii

سه شنبه 03 آبان 1390, 23:19 عصر

:خجالت:سلام دوستان برنامه نویس
من می خواستم روی فرمم ساعت سیستمو نمایش بدم وقتی جستجو کردم کدشو پیدا کردم اما نمی دونم چرا ثانیه شمار ساعتم کار نمیکنه:خجالت: توی یه تاپیک خوندم که باید از dll استفاده کنم اما اصلا توضیح نداده بود چه طوری می شه راهنماییم کنید:بوس:

sina_saravi1

سه شنبه 03 آبان 1390, 23:26 عصر

:خجالت:سلام دوستان برنامه نویس
من می خواستم روی فرمم ساعت سیستمو نمایش بدم وقتی جستجو کردم کدشو پیدا کردم اما نمی دونم چرا ثانیه شمار ساعتم کار نمیکنه:خجالت: توی یه تاپیک خوندم که باید از dll استفاده کنم اما اصلا توضیح نداده بود چه طوری می شه راهنماییم کنید:بوس:
شما میخواین ساعت عقربه دار نشون بدین یا عددی ؟
عددی سادست :
Me.Text = Now.TimeOfDay.Hours & ":" & Now.TimeOfDay.Minutes & ":" & Now.TimeOfDay.Seconds
اگه بخوای عقربه دار نشون بدی یا باید از ابزار آماده استفاده کنی یا خودت با کد نویسی و استفاده از توابع گرافیکی کارو انجام بدی

omid-vbAuto

سه شنبه 03 آبان 1390, 23:39 عصر

شما میخواین ساعت عقربه دار نشون بدین یا عددی ؟
عددی سادست :
Me.Text = Now.TimeOfDay.Hours & ":" & Now.TimeOfDay.Minutes & ":" & Now.TimeOfDay.Seconds
اگه بخوای عقربه دار نشون بدی یا باید از ابزار آماده استفاده کنی یا خودت با کد نویسی و استفاده از توابع گرافیکی کارو انجام بدی

آیا میشه کاری کرد که تابع فوق بدون تایمر و در هر لحظه زمان رو نشان داد؟

nasiiiiiii

سه شنبه 03 آبان 1390, 23:41 عصر

دوست عزیز با این کد فقط ساعت را تو تکس باکس نمایش می ده اما ثانیه دقیقه و ساعتش شمارش کار نمی کنه منظورم عقربه دار نیستا می خوام تو همون تکس باکس در واقع یه ساعت داشته باشم که کار کنه (ثانیه دقیقه و ساعتش جلوبره ونمایش بده )

kiarashk

چهارشنبه 04 آبان 1390, 08:59 صبح

دوست عزیز با این کد فقط ساعت را تو تکس باکس نمایش می ده اما ثانیه دقیقه و ساعتش شمارش کار نمی کنه منظورم عقربه دار نیستا می خوام تو همون تکس باکس در واقع یه ساعت داشته باشم که کار کنه (ثانیه دقیقه و ساعتش جلوبره ونمایش بده )

از اين بايد استفاده كني:

TextBox1.Text = My.Computer.clock

M.KH-SH

چهارشنبه 04 آبان 1390, 09:05 صبح

تمام کد ها درسته ولی شما تو یک تایمر که enable=true بنویس

label1.text=format(now,"hh:mm:ss")

دیگه ساعت با ثانیه و .. کار میکنه

http://barnamenevis.org/attachment.php?attachmentid=75973&d=1317237244
http://barnamenevis.org/showthread.php?309089-Digital-Clock-View

kiarashk

چهارشنبه 04 آبان 1390, 09:06 صبح

آیا میشه کاری کرد که تابع فوق بدون تایمر و در هر لحظه زمان رو نشان داد؟

خير فكر نكنم امكانش باشه اكثر جاها هم از همين روش تايمر استفاده شده البته خوب برحسب نياز و كارتون شايد بشه كلكي زد:گیج:

omid-vbAuto

چهارشنبه 04 آبان 1390, 22:25 عصر

خير فكر نكنم امكانش باشه اكثر جاها هم از همين روش تايمر استفاده شده البته خوب برحسب نياز و كارتون شايد بشه كلكي زد:گیج:

البته فکر بشه تابعی نوشت که بر اساس تغییرات زمان و تاریخ سیستم برانگیخته بشه.و نیازی به تایمر نباشه.

nasiiiiiii

پنج شنبه 05 آبان 1390, 00:09 صبح

تمام کد ها درسته ولی شما تو یک تایمر که enable=true بنویس

label1.text=format(now,"hh:mm:ss")

دیگه ساعت با ثانیه و .. کار میکنه

http://barnamenevis.org/attachment.php?attachmentid=75973&d=1317237244
http://barnamenevis.org/showthread.php?309089-Digital-Clock-View
دوست عزیز من این کدو نوشتم و از شما ممنونم اما میشه در باره تابع format توضیح بدین:بوس:

M.KH-SH

پنج شنبه 05 آبان 1390, 10:31 صبح

تابع format یک ورودی داره و به شکل دلخواه خروجی میده
مثلا برای عددی میشه یک تابع نوشت به صورت زیر:

private function change (x as long)
change=format(x,"###,###,###")
end function