Guida al Visual Basic: Timer
Il controllo timer e le funzioni data/oraPrincipale 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 |