Retorna uma Variante (Data).
Sintaxe
DateValue ( date )
A data necessáriaargumento normalmente é uma expressão de cadeia de caracteres que representa uma data de 1º de janeiro de 100 a 31 de dezembro de 9999. No entanto, a data também pode ser qualquer expressão que possa representar uma data, uma hora ou uma data e hora nesse intervalo.
Comentários
Se a data for uma cadeia de caracteres que inclui apenas números separados por separadores de data válido, DateValue reconhecerá a ordem de mês, dia e ano de acordo com o formato de Data Curta especificado para o sistema. DateValue também reconhece datas inequívocas que contêm nomes de mês, de forma longa ou abreviada. Por exemplo, além de reconhecer 30/12/1991 e 30/12/91, DateValue também reconhece 30 de dezembro de 1991 e 30 de dezembro de 1991.
Se a parte do ano da data for omitida, DateValue usará o ano atual da data do sistema do computador.
Se o argumento de data incluir informações de hora, DateValue não o retornará. No entanto, se a data incluir informações de hora inválidas (como "89:98"), ocorrerá um erro.
Observação: Para a data, se a configuração da propriedade Calendar for gregoriana, a data fornecida deverá ser gregoriana. Se o calendário for Hijri, a data fornecida deverá ser Hijri. Se a data fornecida for Hijri, a data do argumento será uma Cadeia de Caracteres que representa uma data de 1/1/100 (gregoriano 2 de agosto de 718) a 3/4/9666 (gregoriano 31 de dezembro de 9999).
Exemplos de consulta
|
Expressão |
Resultados |
|
SELECT DateValue([DateTime]) AS Expr1 FROM ProductSales; |
Retorna os valores de data do campo "DateTime" no formato de data curta sem as informações de hora. |
|
SELECT DateValue([DateTime]) AS NewDate, Count(ProductSales.DateTime) AS CountOfDateTime FROM ProductSales GROUP BY DateValue([DateTime]); |
Retorna os valores de data do campo "DateTime" no formato de data curta sem as informações de hora. |
Exemplo de VBA
Observação: Exemplos a seguir demonstram o uso dessa função em um módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.
Este exemplo usa a função DateValue para converter uma cadeia de caracteres em uma data. Você também pode usar literais de data para atribuir diretamente uma data a uma variável Variant ou Date , por exemplo, MyDate = #2/12/69#.
Dim MyDate
MyDate = DateValue("February 12, 1969") ' Return a date.
