گرفتن اختلاف روز و ساعت

[Forutan 28]

سلام دوستان

یه تاریخ دارم بعنوان تاریخ انقضاء به همراه ساعت

میخوام کاربر که وارد برنامه میشه تعداد روز و ساعت و دقیقه و ثانیه باقی مانده رو نمایش بدم و شمارش معکوس هم درجریان باشه

2021-01-31,23:59:59 این میشه زمان انقضاء باید زمان حال رو بگیریم و اختلاف رو بدست بیاریم و شمارش رو با تایمر شروع کنیم

میشه توی گرفتن اختلاف و تطبیقشون راهنمایی کنید

[محمدرضا شاهپیری 5,579]

در 14 ساعت قبل، For گفته است :

 

سلام و درود. از کلاس DateUtils استفاده کنید. به شکل زیر. کلاس هم پیوست شده

Dim year As Long =DateTime.GetYear(DateTime.Now)
Dim month As Long =DateTime.GetMonth(DateTime.Now)
Dim day As Long =DateTime.GetDayOfMonth(DateTime.Now)
Dim hour As Long =DateTime.GetHour(DateTime.Now)
Dim minut As Long =DateTime.GetMinute(DateTime.Now)
Dim secound As Long =DateTime.GetSecond(DateTime.Now)
Dim startDate As Long = DateUtils.SetDateAndTime(year,month,day, hour, minut, secound)
Dim endDate As Long = DateUtils.SetDateAndTime(2021,1,31, 23, 59, 59)
Dim p As Period = DateUtils.PeriodBetween(startDate, endDate)
Log(p)

DateUtils.zip

[mehrad 37]

عالی