DateAndTime.DateDiff Método

Tratamento de parâmetros. DateDiff subtrai o valor do Date1 valor de Date2 produzir a diferença. Nenhum valor é alterado no programa de chamada.

Valores retornados. Como Date1 e Date2 são do Date tipo de dados, eles mantêm valores de data e hora precisos para tiques de 100 nanossegundos no temporizador do sistema. No entanto, DateDiff sempre retorna o número de intervalos de tempo como um Long valor.

Se Date1 representar uma data e hora posteriores, Date2DateDiff retornará um número negativo.

Intervalos de dia. Se Interval estiver definido como DateInterval.DayOfYear, ele será tratado da mesma forma DateInterval.Day, porque DayOfYear não é uma unidade significativa para um intervalo de tempo.

Intervalos de semana. Se Interval estiver definido como DateInterval.WeekOfYear, o valor retornado representará o número de semanas entre o primeiro dia da semana que Date1 contém e o primeiro dia da semana que Date2contém . O exemplo a seguir mostra como isso produz resultados diferentes de 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)

No exemplo anterior, DateDiff retorna 0 para wD porque a diferença entre as duas datas é menor que sete dias, mas retorna 1 para wY porque há uma diferença de sete dias entre os primeiros dias das respectivas semanas do calendário.

Intervalos maiores. Se Interval for definido como DateInterval.Year, o valor retornado será calculado puramente a partir das partes do ano de Date1 e Date2. Da mesma forma, o valor retornado é DateInterval.Month calculado puramente a partir das partes ano e mês dos argumentos e para DateInterval.Quarter os trimestres que contêm as duas datas.

Por exemplo, ao comparar 31 de dezembro a 1º de janeiro do ano seguinte, DateDiff retorna 1 para DateInterval.Year, DateInterval.Quarterou DateInterval.Month, mesmo que no máximo um dia tenha decorrido.

Para culturas como japonês que têm várias eras, o DateDiff método não retorna uma diferença em anos se a diferença abrange duas ou mais eras. Em vez disso, você pode calcular a diferença de valores retornados pela Year propriedade, conforme mostrado no exemplo a seguir: date2.Year - date1.Year.

Outros intervalos. Como cada Date valor tem suporte por uma DateTime estrutura, seus métodos oferecem opções adicionais para encontrar intervalos de tempo. Por exemplo, você pode usar o Subtract método em qualquer um de seus formulários sobrecarregados: DateTime.Subtract subtrai um TimeSpan de uma Date variável para retornar outro Date valor e DateTime.Subtract subtrai um Date valor para retornar um TimeSpan. Você pode cronometrar um processo para descobrir quantos milissegundos são necessários, como mostra o exemplo a seguir.

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

Tratamento de parâmetros. DateDiff subtrai o valor do Date1 valor de Date2 produzir a diferença. Nenhum valor é alterado no programa de chamada.

Valores retornados. Como Date1 e Date2 são do Date tipo de dados, eles mantêm valores de data e hora precisos para tiques de 100 nanossegundos no temporizador do sistema. No entanto, DateDiff sempre retorna o número de intervalos de tempo como um Long valor.

Se Date1 representar uma data e hora posteriores, Date2DateDiff retornará um número negativo.

Intervalos de dia. Se Interval estiver definido como DateInterval.DayOfYear, ele será tratado da mesma forma DateInterval.Day, porque DayOfYear não é uma unidade significativa para um intervalo de tempo.

Intervalos de semana. Se Interval estiver definido como DateInterval.WeekOfYear, o valor retornado representará o número de semanas entre o primeiro dia da semana que Date1 contém e o primeiro dia da semana que Date2contém . O exemplo a seguir mostra como isso produz resultados diferentes de 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)

No exemplo anterior, DateDiff retorna 0 para wD porque a diferença entre as duas datas é menor que sete dias, mas retorna 1 para wY porque há uma diferença de sete dias entre os primeiros dias das respectivas semanas do calendário.

Intervalos maiores. Se Interval for definido como DateInterval.Year, o valor retornado será calculado puramente a partir das partes do ano de Date1 e Date2. Da mesma forma, o valor retornado é DateInterval.Month calculado puramente a partir das partes ano e mês dos argumentos e para DateInterval.Quarter os trimestres que contêm as duas datas.

Por exemplo, ao comparar 31 de dezembro a 1º de janeiro do ano seguinte, DateDiff retorna 1 para DateInterval.Year, DateInterval.Quarterou DateInterval.Month, mesmo que no máximo um dia tenha decorrido.

Para culturas como japonês que têm várias eras, o DateDiff método não retorna uma diferença em anos se a diferença abrange duas ou mais eras. Em vez disso, você pode calcular a diferença de valores retornados pela Year propriedade, conforme mostrado no exemplo a seguir: date2.Year - date1.Year.

Outros intervalos. Como cada Date valor tem suporte por uma DateTime estrutura, seus métodos oferecem opções adicionais para encontrar intervalos de tempo. Por exemplo, você pode usar o Subtract método em qualquer um de seus formulários sobrecarregados: DateTime.Subtract subtrai um TimeSpan de uma Date variável para retornar outro Date valor e DateTime.Subtract subtrai um Date valor para retornar um TimeSpan. Você pode cronometrar um processo para descobrir quantos milissegundos são necessários, como mostra o exemplo a seguir.

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