data2x
gestione sintassi
variabili tipo Date
assegnazione elementi per variabile tipo Date mediante #...# o
Dateserial
creazione formato data utilizzando dati numerici forniti a
DateSerial
valori assegnati da codice
Private Sub CommandButton1_Click()
Rem diversi modi di assegnare data a
variabile
Dim datax, datay, dataz As Date
Rem assegna data (#mese/giorno/anno#)a variabile tipo date
datax = (#1/29/2010#)
ListBox1.AddItem (datax)
datay = (1 / 29 / 2010) 'formato errato, manca #
ListBox1.AddItem (datay)
Rem assegnare data (anno,mese,giorno)
Rem viene visualizzato mese,giorno,anno, come con datax
ListBox1.AddItem (DateSerial(1998, 12, 31))
ListBox1.AddItem (DateSerial(1999, 10, 20))
ListBox1.AddItem (DateSerial(2010, 1, 29))
dataz = (DateSerial(2010, 1, 29))
ListBox1.AddItem (dataz)
End Sub