Returnează o valoare variant (Dată).
Sintaxă
DateValue(dată)
Argumentul de datănecesar este în mod normal o expresie șir care reprezintă o dată între 1 ianuarie 100 și 31 decembrie 9999. Totuși, data poate fi, de asemenea, orice expresie care poate reprezenta o dată, o oră sau atât o dată, cât și o oră din acel interval.
Observații
Dacă dată este un șir care include doar numere separate prin separatori de dată validi, DateValue recunoaște ordinea pentru lună, zi și an în conformitate cu formatul Dată scurtă specificat pentru sistem. DateValue recunoaște, de asemenea, datele neambigue care conțin nume de luni, fie în formă lungă, fie în formă abreviată. De exemplu, pe lângă recunoașterea valorilor 30.12.1991 și 30.12.1991, DateValue recunoaște și 30 decembrie 1991 și 30 decembrie 1991.
Dacă partea de an din dată este omisă, DateValue utilizează anul curent de la data de sistem a computerului.
Dacă argumentul dată include informații despre oră, DateValue nu le returnează. Totuși, dacă data include informații de oră nevalide (cum ar fi "89:98"), apare o eroare.
Notă
Pentru dată, dacă setarea proprietății Calendar este gregorian, data furnizată trebuie să fie gregoriană. Dacă calendarul este Hijri, data furnizată trebuie să fie Hijri. Dacă data furnizată este Hijri, data argumentului este un Șir reprezentând o dată între 1.01.100 (Gregorian 2 august 718) și 3/4/9666 (Gregorian Dec 31, 9999).
Exemple de interogare
| Expresie | Rezultatele |
|---|---|
| SELECT DateValue([DateTime]) AS Expr1 FROM ProductSales; | Returnează valorile de dată ale câmpului "DateTime" în formatul Dată scurtă, fără informații despre oră. |
| SELECT DateValue([DateTime]) AS NewDate, Count(ProductSales.DateTime) AS CountOfDateTime FROM ProductSales GROUP BY DateValue([DateTime]); | Returnează valorile de dată ale câmpului "DateTime" în formatul Dată scurtă, fără informații despre oră. |
Exemplu VBA
Notă
Exemplele care urmează demonstrează utilizarea acestei funcții într-un modul Visual Basic for Applications (VBA). Pentru mai multe informații despre lucrul cu VBA, selectați Referințe pentru dezvoltatori în lista verticală de lângă Căutare și introduceți unul sau mai mulți termeni în caseta de căutare.
Acest exemplu utilizează funcția DateValue pentru a efectua conversia unui șir într-o dată. De asemenea, puteți utiliza literali de date pentru a atribui direct o dată unei variabile Variant sau Dată , de exemplu, DataMea = #12/2/69#.
Dim MyDate
MyDate = DateValue("February 12, 1969") ' Return a date.