IMP logicaesercitazione didattica con visual basic su powerpointfunzione IMP

IMP logica esercitazione didattica con visual basic su powerpoint funzione IMP
 
Private Sub CommandButton1_Click() Dim x As Integer Dim y As Integer x = 10 y = 20 Lista.AddItem ("verifica con funzione :If (x > 0 Imp y > 0) ") Lista.AddItem ("sempre vero: falso solo se primo vero e secondo falso") Lista.AddItem ("vero , vero > vero") Lista.AddItem ("falso,falso > vero") Lista.AddItem ("falso,vero > vero") Lista.AddItem ("vero,falso > falso") Lista.AddItem ("------------------------") Lista.AddItem ("vero perchè entrambi veri") If verificaIMP(x, y) Then Lista.AddItem ("vero " & x * y) Else Lista.AddItem ("falso " & x + y) End If Lista.AddItem ("----------------------") End Sub Private Sub CommandButton2_Click() Dim x As Integer Dim y As Integer x = -10 y = -20 Lista.AddItem ("vero perchè entrambi falsi") If verificaIMP(x, y) Then Lista.AddItem ("vero " & x * y) Else Lista.AddItem ("falso " & x + y) End If End Sub Private Sub CommandButton3_Click() Dim x As Integer Dim y As Integer x = -...

Leggi tutto l'articolo