Il controllo timer e le funzioni data/ora

Principale funzioni Del visual Basic su data e ora

La funzione:
Now( )  restituisce data e ora di sistema in formato esteso tipo :

07/05/05 10.13.20 

Time  restituisce solo  10.13.20 

Date   restituisce solo  07/05/05

Le funzioni 
Day  giorno
Month 
mese
Year 
anno
Vanno applicate a Date o a  NOW

Mentre le funzioni

Hour  Ora
Minute Minuti
Second  Secondi

Vanno applicate a Time  o a  NOW


Aggiungiamo il controllo timer ad un progetto per creare un orologio con la data:


Dopo averlo aggiunto, andiamo sulla proprietà interval e gli assegniamo il valore
1000 ? cos'è? E l'intervallo in millisecondi dopo il quale il timer
ci restituirà l'evento timer, cioè scatterà il secondo (1000ms=1 s)
mettiamo in questo evento 

Private Sub Timer1_Timer()
Label1.Caption = Time
Label2.Caption = Date
Label3.Caption = "sono le ore " & Hour(Time) & " ," & Minute(Time) & _
" minuti" & " e " & Second(Time) & " secondi"
Label4.Caption = "Del " & Day(Date) & " " & mese(Month(Date)) & _   " " & Year(Date)
End Sub
La funzione mese è stata aggiunta nella sezione generale del form:
Public Function mese(x) As String
Select Case x
Case 1
mese = "Gennaio"
Case 2
mese = "Febbraio"
Case 3
mese = "Marzo"
Case 4
mese = "Aprile"
Case 5
mese = "Maggio"
Case 6
mese = "Giugno"
Case 7
mese = "luglio"
Case 8
mese = "Agosto"
Case 9
mese = "Settembre"
Case 10
mese = "Ottobre"
Case 11
mese = "Novenbre"
Case 12
mese = "Dicembre"
End Select
End Function
ma adesso mi direte : ma cosa è una funzione?

Le funzioni possono essere inserite nella parte generale del form ed essere richiamate da qualsiasi evento.Per inserire una funzione, dal menu strumenti---> inserisci routine.. apparirà la seguente finestra:

spuntare ora su function e scrivere il nome della funzione

Come vediamo sopra, quando richiamiamo la funzione dobbiamo passargli l'argomento "x" che nel nostro caso è Month(Date) che è la funzione del visual basic che restituisce il mese; poi trasformiamo il numero nel nome del mese. Questo esempio è solamente a scopo didattico; ci sono infatti dei metodi più immediati per raggiungere questo risultato.

scarica l'esempio orologio.zip

Torna all' indice