Un calendario in Visual Basic
Ogni applicazione che si rispetti ha bisogno al suo interno di gestire le date, e mettere l'utente in condizione di farlo in maniera semplice ed usabile è la via del successo per conferire all'applicazione un valore aggiunto.
Allo scopo vediamo come realizzare un calendario per la gestione della data in Visual Basic.
Si apra la propria copia di VB6 e si scelga di lavorare su di un nuovo EXE.
Accedere al menu:
Progetto / Componentied aggiungere le seguenti voci alla barra degli strumenti:
- Microsoft Windows Common Controls 6.0 (SP6)
- Microsoft Windows Common Controls-2.5.0 (SP2)
- Microsoft Windows Common Controls-2-6-0
Si mandi in esecuzione il programma attraverso il tasto [F5] e si apprezzi il risultato:
Per l'esempio si assegni il nome calendario all'elemento appena creato e si faccia un doppio click sull'elemento stesso, in modo da accedere al suo codice.
Vediamo dunque come recuperare la data selezionata:
Private Sub calendario_DateClick(ByVal DateClicked As Date)
Dim data As String
data = calendario.Day & "/"
data = data & calendario.Month & "/"
data = data & calendario.Year
data = CDate(data)
MsgBox data
End Sub
Dichiariamo una variabile di tipo stringa ed al suo interno memorizziamo il formato italiano della data corrente attraverso l'utilizzo delle proprietà Day, Month ed Year, i cui specifici funzionamenti sono abbastanza intuitivi dal loro nome.
A questo punto convertiamo il risultato in un tipo data reale ed utilizzeremo il suo valore ad uno scopo ben più nobile di quello di mostrarlo su di una MsgBox.
