Le variabili

La visibilità di una variabile, o di una costante, definisce la sua disponibilità all'interno del progetto. Puoi dichiarare variabili e costanti a tre livelli:

Livello locale: vanno dichiarate all'interno della routine e sono disponibili solo all'interno di essa.
Livello di modulo: Vanno dichiarate in testa alla finestra di modulo di codice e sono viste da tutte le routine contenute all'interno del modulo di codice.
Livello pubblico: Vanno dichiarate in testa alla finestra di modulo di codice e sono viste da tutte le routine e da tutti i moduli di codice appartenenti al progetto.

Vediamo un esempio:

	' Le seguenti variabili sono visibili in tutto il progetto
	Public risultato1 As Integer
	Public risultato2 As Integer
	Public sottraendo As Integer
	' La seguente variabile è visibile a livello di modulo
	Private operatore As Integer
	Sub somma()
	    ' La seguente variabile è visibile 
	    ' solo all'interno della routine
	    Dim Addendo As Integer
	    operatore = 5
	    Addendo = 5
	    risultato1 = Addendo + operatore
	    MsgBox "Il risultato della somma è: " & risultato1, _
	    vbInformation, "Somma"
	End Sub
	Sub sottrazione()
	    ' La seguente variabile è visibile 
	    ' solo all'interno della routine
	    Dim sottraento As Integer
	    sottraento = 2
	    risultato2 = operatore - sottraento
	    MsgBox "Il risultato della sottrazione è: " & risultato2, _
	    vbInformation, "Sottrazione"
	End Sub

Posizionandosi all'interno di una delle routine e premendo il tasto azione noteremo il risultato:

Soffermiamo la nostra attenzione su alcuni aspetti:

Il carattere "_" alla fine di una riga indica che si desidera continuare l'istruzione alla riga successiva.
Il carattere "&" serve per concatenare due stringhe di caratteri.

L'assegnazione del valore alla variabile avviene seguendo la sintassi:

	NomeVariabileStringa = "Stringa di caratteri" 
	' una stringa di caratteri va immessa tra doppi apici.
	NomeVariabileNumerica = numero 
	' il numero non è immesso tra doppio apice.

L'attributo di visibilità può essere assegnato anche alle “Function” e alle “Sub”. Esempio:

	' La procedura seguente è vista solamente a livello di modulo
	Private Sub visualizza()
	    Dim numero1 As Integer
	    Dim numero2 As Integer
	    Dim numero3 As Integer
	    numero1 = 15
	    numero2 = 5
	    numero3 = sottrazione(numero1, numero2)
	    MsgBox "Il risultato della differenza è: " & numero3, _ 
	    vbInformation, "differenza"
	End Sub
	' La funzione seguente è vista a livello di progetto
	Public Function sottrazione(operando1 As Integer, _ 
	operando2 As Integer) As Integer
	    sottrazione = operando1 - operando2
	End Function