Guida VBScript - Esercitazione Usare un If per un semplice Quiz

Con le conoscenze che abbiamo fin qui, facciamo un piccolo quiz.

CODICE:

Option Explicit 'Tutte le variabili vanno dichiarate
Dim r 'Variabile r che servirà per la risposta
r = InputBox("Per quale libro Dan Brown è famoso ?")
'Viene visualizzata la domanda che automaticamente
'darà il valore immesso alla variabile r
If r = "Il Codice da Vinci" Then
wscript.echo("Esatto, Dan Brown è famoso per Il Codice da Vinci")
'Se si immette "Il Codice da Vinci", viene visualizzato
'che la risposta è esatta
Else
wscript.echo("Hai sbagliato, la risposta era Il Codice da Vinci")
'Altrimenti, appare che la risposta è errata
End If

Ecco, programmare col VBS non è poi così difficile!