tratto dalla guida di abcd1234 dello sciax2 forum
Guida al Visual Basic: Timer
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.