E' talmente facile che non ci riesco .
Dati due numeri A e B in Ingresso stabilire quale dei due sia il maggiore. Nel caso in cui i due numeri siano uguali comunicarlo con un apposito messaggio (vedere Figura 2). Variabili in Ingresso: variabili A e B. Variabili in Uscita: messaggio che può o indicare il numero maggiore, il numero minore, o se sono uguali.
Lo script fatto non funziona

Dati due numeri A e B in Ingresso stabilire quale dei due sia il maggiore. Nel caso in cui i due numeri siano uguali comunicarlo con un apposito messaggio (vedere Figura 2). Variabili in Ingresso: variabili A e B. Variabili in Uscita: messaggio che può o indicare il numero maggiore, il numero minore, o se sono uguali.
Lo script fatto non funziona
Codice:
Option Explicit
Sub Main
Dim a,b
a=InputBox ("Inserisci un numero" )
b=InputBox ("Inserisci un numero" )
If a > b Then
If a < b Then
Scrivi b &" è maggiore di "& a
Else
Scrivi a &" è uguale a "& b
End If
Scrivi a &" è maggiore di "& b
End If
End Sub
