|
|
- Group:
- Member
- Posts:
- 16
- Status:
| |
| CITAZIONE (_max59 @ 27/4/2014, 21:24) Sub main()
Dim nu4(8) ambt= InputBox("quale ambata giocare") amb2=Fuori90(ambt+10) i=0 Do While ambt <>amb2
i=i+1 nu4(i)=amb2 amb2=Fuori90(amb2+10) Scrivi " ambata e cadenza " & ambt & " " & amb2
If i = 8 Then Exit Do ' l'istruzione if ferma il ciclo al raggiungimento dell'ottavo numero trovato (nu4(8))
Loop
End Sub
----------------------------------- Cordialità Io avevo risolto mettendo la verifica sul ciclo while su i<8, il problema che non capisco perchè la condizione<> non viene accettata dall'istruzione while????
|
| |