VBA - Funzione CDate

La funzione converte un'espressione di data e ora valida nel tipo di data.

Sintassi

cdate(date)

Esempio

Aggiungi un pulsante e aggiungi la seguente funzione.

Private Sub Constant_demo_Click()
   Dim a as Variant
   Dim b as Variant
   
   a = cdate("Jan 01 2020")
   msgbox("The Value of a : " & a)
   
   b = cdate("31 Dec 2050")
   msgbox("The Value of b : " & b)
End Sub

Quando si esegue la funzione, produce il seguente output.

The Value of a : 1/01/2020
The Value of b : 31/12/2050