تابعی برای بدست آوردن اختلاف بین دو تاریخ – بیسیک۴اندروید


تابعی برای بدست آوردن اختلاف بین دو تاریخ – بیسیک۴اندروید
۷ اردیبهشت ۱۳۹۸
1574 بازدید
نویسنده:

اگر دو تاریخ با فاصله زیاد یا کم از هم داشته باشیم با استفاده ازاین تابع میتونیم اختلاف بین این دو رو بصورت روز، ساعت و دقیقه محاسبه کنیم.

 

تابع بیسیک۴اندروید

 

Sub between(t1 As Long,t2 As Long) As String
  Dim t As Long=Abs(t1-t2)
  Dim days, hours, minutes As Int
  days = Floor(t / DateTime.TicksPerDay)
  hours = Floor((t Mod DateTime.TicksPerDay) / DateTime.TicksPerHour)
  minutes = Floor((t Mod DateTime.TicksPerHour) / DateTime.TicksPerMinute)

  Return days&"روز و "&hours&"ساعت و "&minutes&"دقیقه "
End Sub

 

استفاده

 

ورودی اول: تاریخ یا ساعت اول (بصورت میلی ثانیه)

ورودی دوم تاریخ یا ساعت دوم (بصورت میلی ثانیه)
در این مثال دوتاریخ رو به میلی ثانیه تبدیل و نتیجه رو مسیج باکس دادیم:

 

DateTime.DateFormat="yyyy/mm/dd"
Msgbox( between( DateTime.DateParse("2016/10/20") , DateTime.DateParse("2017/02/20") ) ,"")

آموزش برنامه نویسی اندروید

پژمان نیکروان
پژمان نیکروان

پژمان نیکروان هستم؛ مدیر وب سایت کافه توسعه، شروع فعالیتم به برنامه نویسی از سال 1392 بوده و هدف از ایجاد وبسایت اشتراک گذاری تجارب خودم و دیگر برنامه نویسان هست.

ارسال دیدگاه

می توانید از تگ های HTML نیز استفاده کنید :
<a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

هیچ دیدگاهی وجود ندارد!