Questo sito utilizza cookie, anche di terze parti, per migliorare la tua esperienza e offrire servizi in linea con le tue preferenze. Chiudendo questo banner, scorrendo questa pagina o cliccando qualunque suo elemento acconsenti all’uso dei cookie

Rimani informato sugli aggiornamenti di SOS-OFFICE. Inserisci il tuo indirizzo e-mail: Informativa sulla privacy

Ci sono molte situazioni in cui può essere utile un fom con una casella combinata che mostra un elenco di anni.

Immaginiamo che la nostra casella combinata debba mostrare l'elenco degli anni dal 1910 fino all'anno in corso. Ovviamente, l'anno in corso cambia ogni anno e, se popolassimo in modo statico la casella combinata, ogni nuovo anno dovremmo aggiungerle una voce per l'anno in corso.

Usando Visual Basic possiamo risolvere questo piccolo problema.

 

Immaginiamo di avere un progetto con un form chiamato frmPrincipale e su di esso la combo box cboAnno. Vogliamo fare in modo che, al caricamento di form, la combo box sia popolata con tutti gli anni dal 1910 all'anno in corso. L'anno in corso sarà sempre aggiornato.

Ecco il codice necessario

 

Private Sub UserForm_Initialize()

'popolo cboAnno con gli anni dal 1910 ad oggi

Dim anno As Integer
anno = Year(Date)

For y = 1910 To anno
 cboAnno.AddItem y

Next y

End Sub
Joomla templates by a4joomla