Devolve uma Variante (Data) contendo a data do sistema atual.
Sintaxe
Data
Observações
Para definir a data do sistema, utilize a instrução Data .
Se utilizar a função Data com um calendário Gregoriano, o comportamento de Date$ não será alterado pela definição da propriedade Calendário . Se o calendário for Hijri, Date$ devolve uma cadeia de 10 carateres do formulário mm-dd-aaaa, em que mm (01-12), dd (01-30) e aaaa (1400-1523) são o mês, dia e ano hijri. A gama gregoriana equivalente é de 1 de janeiro de 1980 a 31 de dezembro de 2099.
Exemplos de consulta
Expressão |
Resultados |
SELECT Date() AS Expr1 FROM ProductSales GROUP BY Date(); |
Devolve a "data" do sistema atual para no formato de data abreviada. Resultado: "dd/mm/aaaa". |
SELECT Date()-[DateofSale] AS DaysSinceSale FROM ProductSales; |
Devolve a diferença entre os valores de "Data" e data do sistema atual do campo "DateofSale" como número e apresenta os resultados na coluna "DaySinceSale". |
Exemplos de VBA
Utilizar Data numa expressão Pode utilizar a função Data onde quer que possa utilizar expressões. Por exemplo, pode definir a propriedade Origem do Controlo de uma caixa de texto num formulário da seguinte forma:
=Data()
Quando o formulário está aberto na vista Formulário, a caixa de texto apresenta a data atual do sistema.
Utilizar a função Date no código VBA
Nota: Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.
Este exemplo utiliza a função Data para devolver a data atual do sistema.
Dim MyDate
MyDate = Date ' MyDate contains the current system date.