data1

sintassi per variabili tipo date (giorno/mese/anno oppure mese/giorno/anno)
Date, Year, Month, Day
uso di oggetti come CommandButton e ListBox.Additem

creare commandbutton1 e listbox1

 

Private Sub CommandButton1_Click()
Rem fornisce data corrente giorno/mese/anno
Rem oppure all'americana mese/giorno/anno
ListBox1.AddItem
(Date) & " data corrente:mese/giorno/anno"
ListBox1.AddItem ("----------------------------")
Rem fornisce giorno data corrente
ListBox1.AddItem
(Day(Date)) & " giorno data corrente"
Rem fornisce mese data corrente
ListBox1.AddItem
(Month(Date)) & " mese data corrente"
Rem fornisce anno data corrente
ListBox1.AddItem
(Year(Date)) & " anno data corrente"
End Sub

 

data1.ppt