Devolve uma Variante (Data).
Sintaxe
DateValue(data)
O argumento de datanecessário é normalmente uma expressão de cadeia 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 date for uma cadeia que inclui apenas números separados por separadores de data válidos, DateValue reconhece a encomenda para mês, dia e ano de acordo com o formato de Data Abreviada que especificou para o seu sistema. DateValue também reconhece datas inequívocas que contêm nomes de meses, quer 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 utiliza o ano atual a partir da data do sistema do computador.
Se o argumento de data incluir informações de hora, DateValue não as devolve. No entanto, se a data incluir informações de hora inválidas (como "89:98"), ocorrerá um erro.
Observação
Para data, se a definição da propriedade Calendar for Gregoriano, a data fornecida tem de ser Gregoriana. Se o calendário for Hijri, a data fornecida tem de ser Hijri. Se a data fornecida for Hijri, a data do argumento é uma Cadeia que representa uma data de 1/1/100 (Gregoriano 2 de agosto de 718) a 3/4/9666 (31 de dezembro de 9999 gregoriano).
Exemplos de consulta
| Expressão. | Resultados |
|---|---|
| SELECT DateValue([DateTime]) AS Expr1 FROM ProductSales; | Devolve os valores de data do campo "DateTime" no formato Data abreviada sem as informações de hora. |
| SELECT DateValue([DateTime]) AS NewDate, Count(ProductSales.DateTime) AS CountOfDateTime FROM ProductSales GROUP BY DateValue([DateTime]); | Devolve os valores de data do campo "DateTime" no formato Data abreviada sem as informações de hora. |
Exemplo de VBA
Observação
Exemplos que se seguem demonstram a utilização desta função num módulo Visual Basic for Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Programador na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.
Este exemplo utiliza a função DateValue para converter uma cadeia numa data. Também pode utilizar literais de data para atribuir diretamente uma data a uma variável Variante ou Data , por exemplo MyDate = #12/2/69#.
Dim MyDate
MyDate = DateValue("February 12, 1969") ' Return a date.