– Coding Room –
/*
ITIS “F.GIORDANI” Caserta
A.S. 2016/17
classe 4D informatica
indirizzo di studio: Informatica e Telecomunicazione – articolazione Informatica
Materia: Informatica
Programmatore: Umberto Pennacchio
Sistema Operativo: Windows 10
Compilatore: Microsoft Excel 2007
Linguaggio: Visual Basic For Application
Obbiettivo didattico: Utilizzare la selezione
Obbiettivo del programma: Acquisiti due numeri da tastiera, dire se sono uguali o qual è il maggiore.
*/
Private Sub CommandButton1_Click()
If Cells(3, 1) > Cells(5, 2) Then
Cells(7, 1) = “A è maggiore di B”
ElseIf Cells(3, 1) < Cells(5, 2) Then
Cells(7, 1) = “A è minore di B”
Else
Cells(7, 1) = “A è uguale a B”
End If
End Sub
Commenti recenti