DateDiff
Count = DateDiff ( Date1 AS Date , Date2 AS Date , Period AS Integer ) AS Integer
ترجع الفارق بين تاريخين كرقم صحيح.
-
Date1_ هو التاريخ اﻷكبر.
-
Date2_ هو التاريخ اﻷصغر.
-
Period_ تمثل نوع القيمة المرجعة: سنة ، شهر، أسبوع ، يوم، انظر للجدول أدناه..
Period_ من الممكن أن يكون من ضمن أحد الثوابت التالية:
|
الثابت
|
التأثير
|
|---|
gb.Second
|
ترجع عدد الثواني بين التاريخين.
|
gb.Minute
|
ترجع عدد الدقائق بين التاريخين.
|
gb.Hour
|
ترجع عدد الساعات بين التاريخين.
|
gb.Day
|
ترجع عدد اﻷيام بين التاريخين.
|
gb.Week
|
ترجع عدد اﻷسابيع بين التاريخين.
|
gb.WeekDay
|
ترجع عدد أيام اﻷسبوع مع تجاهل يومي السبت واﻷحد.
|
gb.Month
|
ترجع عدد الشهور بين التاريخين.
|
gb.Quarter
|
ترجع عدد الفصول (الربيع ، والصيف، والخريف ، والشتاء) بين التاريخين.
|
gb.Year
|
ترجع عدد السنوات بين التاريخين.
|
Only entire periods are returned. The result is round down.
Examples
PRINT DateDiff("01/02/2005 12:55:00", "01/01/2005", gb.Day)
يوضح هذا المثال كيفية عمل الدالة DateDiff داخليا
DIM date1 AS Date
DIM date2 AS Date
DIM fDiff AS Float
DIM iDiff AS Integer
date1 = Date(1964, 02, 28, 0, 29, 0
date2 = Date(1964, 03, 01, 0, 30, 0) ' one minute more than two days
fDiff = CFloat(date2) - CFloat(date1)
iDiff = Int(fDiff * 24)
PRINT "first : "; fdiff; " int:"; idiff; " DateDiff:"; DateDiff(date1, date2, gb.Hour)
date1 = Date(1964, 02, 28, 0, 30, 0
date2 = Date(1964, 03, 01, 0, 29, 0) ' one minute less than two days
fDiff = CFloat(date2) - CFloat(date1)
iDiff = Int(fDiff * 24)
PRINT "second : "; fdiff; " int:"; idiff; " DateDiff:"; DateDiff(date1, date2, gb.Hour)
first : 2.000694444403 int:48 DateDiff:48
second : 1.999305555597 int:47 DateDiff:47
إنظر أيضا