Guida VBScript
Capitolo 18° - I Metodi
I Metodi si dividono in due categorie: Procedure e Funzioni. La procedura è il sistema più semplice di far eseguire operazioni ad un programma. Ecco come si presenta una procedura:
SINTASSI: Sub <nomeprocedura>() <istruzioni> End Sub Per richiamare la procedura, userò direttamente <nomeprocedura>. Pensiamo a una procedura del genere: CODICE: Sub Io() Dim return return = InputBox("Inserisci un valore") wscript.echo("Il valore immesso è " & return) End Sub E se noi volessimo decidere quale messaggio visualizzare nell'inputbox e nel wscript.echo ? Non c'è problema, esistono gli argomenti: SINTASSI: Sub <nomeprocedura>(<arg1>,<arg2>) <istruzioni> End Sub Teoricamente gli argomenti potrebbero essere infiniti, ma nemmeno devono essere per forza 2... Ecco come cambia la procedura Io di prima: CODICE: Sub Io(input,out) Dim return return = InputBox(input) wscript.echo(out & return) End Sub Basterà richiamare la sub come segue: Io "Inserisci un valore","Il valore immesso è " Le funzioni, invece ci consentono di dare un valore di uscita, ad esempio può essermi utile se devo calcolare l'area di un cerchio a partire dal raggio. SINTASSI: Function <nomefunzione>(<arg>) <istruzioni> End Function All'apparenza sempra così, invece ecco dal punto di vista pratico: CODICE: Function areacerchio(raggio) areacerchio = CDbl(raggio)*CDbl(raggio)*3.14 End Function Se richiamo direttamente, mi da errore, perchè deve dare il valore a qualcosa. Ad esempio se voglio creare un piccolo programma per calcolarla, farò così: CODICE: Option Explicit 'Tutto va dichiarato On Error Resume Next 'Se fa errore, non notifica Dim r 'Dichiaro le variabili r = InputBox("Raggio del cerchio") 'Richiede il raggio wscript.echo(areacerchio(r)) 'Visualizza il raggio Function areacerchio(raggio) areacerchio = CDbl(raggio)*CDbl(raggio)*3.14 'Esegue raggio * raggio * 3.14 End Function Ecco come funziona.
|