DateAndTime.DateDiff Метод

Исходный код:

DateAndTime.vb

Исходный код:

DateAndTime.vb

Исходный код:

DateAndTime.vb

Исходный код:

DateAndTime.vb

public static long DateDiff(Microsoft.VisualBasic.DateInterval Interval, DateTime Date1, DateTime Date2, Microsoft.VisualBasic.FirstDayOfWeek DayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Microsoft.VisualBasic.FirstWeekOfYear WeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1);

static member DateDiff : Microsoft.VisualBasic.DateInterval * DateTime * DateTime * Microsoft.VisualBasic.FirstDayOfWeek * Microsoft.VisualBasic.FirstWeekOfYear -> int64

Public Function DateDiff (Interval As DateInterval, Date1 As DateTime, Date2 As DateTime, Optional DayOfWeek As FirstDayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Optional WeekOfYear As FirstWeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1) As Long

Параметры

Возвращаемое значение

Длинное значение, указывающее количество интервалов времени между двумя значениями Date.

Исключения

Примеры

В этом примере функция DateDiff используется для отображения количества дней между заданной датой и сегодня.

Dim date2Entered As String = InputBox("Enter a date")

Try
    Dim date2 As Date = Date.Parse(date2Entered)
    Dim date1 As Date = Now

    ' Determine the number of days between the two dates.
    Dim days As Long = DateDiff(DateInterval.Day, date1, date2)

    ' This statement has a string interval argument, and
    ' is equivalent to the above statement.
    'Dim days As Long = DateDiff("d", date1, date2)

    MessageBox.Show("Days from today: " & days.ToString)
Catch ex As Exception
    MessageBox.Show("Invalid Date: " & ex.Message)
End Try

Комментарии

Функцию DateDiff можно использовать для определения количества указанных интервалов времени между двумя значениями даты и времени. Например, можно использовать DateDiff для вычисления количества дней между двумя датами или число недель между сегодня и окончанием года.

Поведение

• Обработка параметров. DateDiff вычитает значение Date1 из значения Date2 для получения разницы. Ни значение не изменяется в вызывающей программе.

• Возвращаемые значения. Так как Date1 и Date2 относятся к типу данных Date, они содержат точные значения даты и времени до 100-наносекунд на системном таймере. Однако DateDiff всегда возвращает количество интервалов времени в качестве значения Long.

  Если Date1 представляет более позднюю дату и время, чем Date2, DateDiff возвращает отрицательное число.

• Интервалы дня. Если Interval задано значение DateInterval.DayOfYear, он обрабатывается так же, как и DateInterval.Day, так как DayOfYear не является значимым единицей для интервала времени.

• Интервалы недели. Если Interval задано значение DateInterval.WeekOfYear, возвращаемое значение представляет количество недель между первым днем недели, содержащим Date1, и первым днем недели, содержащей Date2. В следующем примере показано, как это создает различные результаты от DateInterval.Weekday.

  ' The following statements set datTim1 to a Thursday
  ' and datTim2 to the following Tuesday.
  Dim datTim1 As Date = #1/4/2001#
  Dim datTim2 As Date = #1/9/2001#
  ' Assume Sunday is specified as first day of the week.
  Dim wD As Long = DateDiff(DateInterval.Weekday, datTim1, datTim2)
  Dim wY As Long = DateDiff(DateInterval.WeekOfYear, datTim1, datTim2)
  

  В предыдущем примере DateDiff возвращает значение 0 к wD, так как разница между двумя датами меньше семи дней, но возвращается 1 до wY, так как между первыми днями соответствующих календарных недель разница между двумя днями.

• Большие интервалы. Если Interval задано значение DateInterval.Year, возвращаемое значение вычисляется исключительно из годовых частей Date1 и Date2. Аналогичным образом возвращаемое значение для DateInterval.Month вычисляется исключительно из частей аргументов года и месяца, а также для DateInterval.Quarter из кварталов, содержащих две даты.

  Например, при сравнении 31 декабря с 1 января следующего года DateDiff возвращается 1 для DateInterval.Year, DateInterval.Quarterили DateInterval.Month, хотя в большинстве случаев прошло всего один день.

  Для таких культур, как японский, который имеет несколько эпох, метод DateDiff не возвращает разницу в годах, если разница охватывает две или более эпохи. Вместо этого можно вычислить разницу значений, возвращаемых свойством Year, как показано в следующем примере: date2.Year - date1.Year.

• Другие интервалы. Так как каждое Date значение поддерживается структурой DateTime, его методы предоставляют дополнительные параметры для поиска интервалов времени. Например, можно использовать метод Subtract в одной из перегруженных форм: DateTime.Subtract вычитает TimeSpan из переменной Date, чтобы вернуть другое значение Date, и DateTime.Subtract вычитает значение Date для возврата TimeSpan. Вы можете заставить процесс узнать, сколько миллисекунд требуется, как показано в следующем примере.

  Dim startTime As Date = Now
  ' Run the process that is to be timed.
  Dim runLength As Global.System.TimeSpan = Now.Subtract(startTime)
  Dim millisecs As Double = runLength.TotalMilliseconds
  

Аргумент Interval может иметь один из следующих параметров.

Аргумент DayOfWeek может иметь один из следующих параметров.

Аргумент WeekOfYear может иметь один из следующих параметров.

См. также раздел

• DateAdd
• DatePart
• Day(DateTime)
• Format(Object, String)
• Now
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• DateTime
• TimeSpan
• Сводка по типу данных (Visual Basic)

Исходный код:

DateAndTime.vb

Исходный код:

DateAndTime.vb

Исходный код:

DateAndTime.vb

Исходный код:

DateAndTime.vb

public static long DateDiff(string Interval, object? Date1, object? Date2, Microsoft.VisualBasic.FirstDayOfWeek DayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Microsoft.VisualBasic.FirstWeekOfYear WeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1);

public static long DateDiff(string Interval, object Date1, object Date2, Microsoft.VisualBasic.FirstDayOfWeek DayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Microsoft.VisualBasic.FirstWeekOfYear WeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1);

static member DateDiff : string * obj * obj * Microsoft.VisualBasic.FirstDayOfWeek * Microsoft.VisualBasic.FirstWeekOfYear -> int64

Public Function DateDiff (Interval As String, Date1 As Object, Date2 As Object, Optional DayOfWeek As FirstDayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Optional WeekOfYear As FirstWeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1) As Long

Параметры

Возвращаемое значение

Длинное значение, указывающее количество интервалов времени между двумя значениями Date.

Исключения

Примеры

В этом примере функция DateDiff используется для отображения количества дней между заданной датой и сегодня.

Dim date2Entered As String = InputBox("Enter a date")

Try
    Dim date2 As Date = Date.Parse(date2Entered)
    Dim date1 As Date = Now

    ' Determine the number of days between the two dates.
    Dim days As Long = DateDiff(DateInterval.Day, date1, date2)

    ' This statement has a string interval argument, and
    ' is equivalent to the above statement.
    'Dim days As Long = DateDiff("d", date1, date2)

    MessageBox.Show("Days from today: " & days.ToString)
Catch ex As Exception
    MessageBox.Show("Invalid Date: " & ex.Message)
End Try

Комментарии

Функцию DateDiff можно использовать для определения количества указанных интервалов времени между двумя значениями даты и времени. Например, можно использовать DateDiff для вычисления количества дней между двумя датами или число недель между сегодня и окончанием года.

Поведение

• Обработка параметров. DateDiff вычитает значение Date1 из значения Date2 для получения разницы. Ни значение не изменяется в вызывающей программе.

• Возвращаемые значения. Так как Date1 и Date2 относятся к типу данных Date, они содержат точные значения даты и времени до 100-наносекунд на системном таймере. Однако DateDiff всегда возвращает количество интервалов времени в качестве значения Long.

  Если Date1 представляет более позднюю дату и время, чем Date2, DateDiff возвращает отрицательное число.

• Интервалы дня. Если Interval задано значение DateInterval.DayOfYear, он обрабатывается так же, как и DateInterval.Day, так как DayOfYear не является значимым единицей для интервала времени.

• Интервалы недели. Если Interval задано значение DateInterval.WeekOfYear, возвращаемое значение представляет количество недель между первым днем недели, содержащим Date1, и первым днем недели, содержащей Date2. В следующем примере показано, как это создает различные результаты от DateInterval.Weekday.

  ' The following statements set datTim1 to a Thursday
  ' and datTim2 to the following Tuesday.
  Dim datTim1 As Date = #1/4/2001#
  Dim datTim2 As Date = #1/9/2001#
  ' Assume Sunday is specified as first day of the week.
  Dim wD As Long = DateDiff(DateInterval.Weekday, datTim1, datTim2)
  Dim wY As Long = DateDiff(DateInterval.WeekOfYear, datTim1, datTim2)
  

  В предыдущем примере DateDiff возвращает значение 0 к wD, так как разница между двумя датами меньше семи дней, но возвращается 1 до wY, так как между первыми днями соответствующих календарных недель разница между двумя днями.

• Большие интервалы. Если Interval задано значение DateInterval.Year, возвращаемое значение вычисляется исключительно из годовых частей Date1 и Date2. Аналогичным образом возвращаемое значение для DateInterval.Month вычисляется исключительно из частей аргументов года и месяца, а также для DateInterval.Quarter из кварталов, содержащих две даты.

  Например, при сравнении 31 декабря с 1 января следующего года DateDiff возвращается 1 для DateInterval.Year, DateInterval.Quarterили DateInterval.Month, хотя в большинстве случаев прошло всего один день.

  Для таких культур, как японский, который имеет несколько эпох, метод DateDiff не возвращает разницу в годах, если разница охватывает две или более эпохи. Вместо этого можно вычислить разницу значений, возвращаемых свойством Year, как показано в следующем примере: date2.Year - date1.Year.

• Другие интервалы. Так как каждое Date значение поддерживается структурой DateTime, его методы предоставляют дополнительные параметры для поиска интервалов времени. Например, можно использовать метод Subtract в одной из перегруженных форм: DateTime.Subtract вычитает TimeSpan из переменной Date, чтобы вернуть другое значение Date, и DateTime.Subtract вычитает значение Date для возврата TimeSpan. Вы можете заставить процесс узнать, сколько миллисекунд требуется, как показано в следующем примере.

  Dim startTime As Date = Now
  ' Run the process that is to be timed.
  Dim runLength As Global.System.TimeSpan = Now.Subtract(startTime)
  Dim millisecs As Double = runLength.TotalMilliseconds
  

Аргумент Interval может иметь один из следующих параметров.

Аргумент DayOfWeek может иметь один из следующих параметров.

Аргумент WeekOfYear может иметь один из следующих параметров.

См. также раздел

• DateAdd
• DatePart
• Day(DateTime)
• Format(Object, String)
• Now
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• DateTime
• TimeSpan
• Сводка по типу данных (Visual Basic)