ArrayVariant

Private Sub Command1_Click()
'

' crea velocemente un array usando i variant

'

Dim aryList As Variant
'

aryList = Array("No Access", "Read-Only", "Update", "Delete")
'

MsgBox aryList(2)
'

End Sub

Se si ha la necessita' di creare una piccola lista di elementi
in un array, e' possibile risparmiare un po' di lavoro
utilizzando il tipo di dati Variant invece di un array
dimensionato dichiarato con tipi di dati standard.
Questo e' pratico specialmente quando si necessita di creare
una lista di frasi da stampare in risposta ad un valore
numerico. Per esempio, aggiungere un bottone ad un form
standard VB ed incollare il codice seguente nelll'evento
Click del bottone