legge della riflessione

verifica numerica legge della riflessione; per codici e attivazione vedi linkhttp://digilander.libero.it/francescovise/vbacodice/prove.htmhttp://digilander.libero.it/francescovise/vbacodice/vbariflessione.htmhttp://digilander.libero.it/francescovise/vbacodice/vbariflessione.xls   copiare codice, aprire excel e creare due pulsanti, incollare codice in primo pulsante (cancellare duplicato Private Sub ...ed End sub):disegnare eventualmente come da imamgine allegataPrivate Sub CommandButton1_Click() Rem leggi riflessione Cells(23, 1) = "inserire angolo riflessione iniziale:2,5,10...poi cliccare pulsante1" Cells(1, 1) = "angolo incidente" Cells(1, 2) = "angolo riflessione" ai = Cells(2, 1) For riga = 2 To 20 Cells(riga, 1) = ai Cells(riga, 2) = ai ai = ai + 2 Next riga End Sub Private Sub CommandButton2_Click() For riga = 2 To 20 For colonna = 1 To 2 Cells(riga, colonna) = "" Next colonna Next riga End Sub