Questo sito utilizza cookies, anche di terze parti, per mostrare pubblicità e servizi in linea con il tuo account. Leggi l'informativa sui cookies.
Username: Password: oppure
Guida VBScript - I Metodi

Guida VBScript

Capitolo 18° - I Metodi

<< Precedente Prossimo >>
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.
<< Precedente Prossimo >>
Input invalido