PDA

View Full Version : سوال: بدست آوردن ساعت فعلی سیستم



MehdiElexal
دوشنبه 01 شهریور 1389, 16:36 عصر
با سلام یه سورس میخوام که ساعت فعلی سیستم رو نشون بده
ممنون

nasim bahari
دوشنبه 01 شهریور 1389, 16:50 عصر
Label1.text=TimeString()

FastCode
دوشنبه 01 شهریور 1389, 17:08 عصر
Label1.text=TimeString()
این کد خیلی چیز استانداردی نیست و توی مونو و سی شارپ و جی شارپ و ... با اینکه قابل استفاده هست بهتره که استفاده نشه.
در ضمن با compiler code-restriction هایی که من استفاده میکنم اصلاً کامپایل نمیشه.
این یکی یه مقدار بیشتره ولی بهتره.

label1.Text = System.DateTime.Now.ToString()

nasim bahari
دوشنبه 01 شهریور 1389, 17:14 عصر
سلام

دوست عزیز ..........

مطمئن باشم که شما کد رو تست کردی ؟

مشکلش چیه ؟ جواب میده....

Saman_12
سه شنبه 02 شهریور 1389, 02:42 صبح
سلام.
این یه دونه تایم و تاریخ سیستم رو با هم بر میگردونه :

Now
اینم برای گرفتن زمان جاری سیستم هست :

Now.ToLongTimeString
اینم برای گرفتن تاریخ جاری هست :

Date.Today
البته روش های که دوستان گفتند نیز کار میکنه من امتحان کردم مشکلی نبود.

Shahram_Shobeiri
سه شنبه 02 شهریور 1389, 08:09 صبح
اینم یه کوئری برای گرفتن زمان جاری سرور sql

SELECT CURRENT_TIMESTAMP

m.javvi
سه شنبه 02 شهریور 1389, 12:00 عصر
چجوری میشه تاریخ شمسی رو داخل تکست گذاشت؟؟

Saman_12
سه شنبه 02 شهریور 1389, 12:48 عصر
ببین من منظورت رو از گذاشتن تاریخ شمسی توی تکست رو نمی فهمم میشه یکم بیشتر توضیح بدی!!!!
برای تبدیل تاریخ میلادی به شمسی می تونی از فانکشن زیر استفاده کنی :


Function MiladiToShamsi(ByVal Year As Integer, ByVal Month As Integer, ByVal Day As Integer) As String
Try
Dim Date_M As Date = Year & "/" & Month & "/" & Day
Dim Date_Sh As New Globalization.PersianCalendar
Return Date_Sh.GetYear(Date_M) & "/" & Format(Date_Sh.GetMonth(Date_M), "00") & "/" & Format(Date_Sh.GetDayOfMonth(Date_M), "00")
Catch ex As Exception
Return 0
End Try
End Function

نیلوفر66
جمعه 05 شهریور 1389, 15:34 عصر
قراردادن زمان جاري در كنترل جعبه متن
ابتدا بر روي جعبه متن كه قرار است ساعت را نمايش دهد دوبار كليك كرده و در رويداد فوكوس كد زير را وارد نماييد
TextBox1.Text = Now.Hour.ToString & ":" & Now.Minute.ToString & ":" & Now.Second.ToString