Ho modificato così:
Sub Main()
Dim ruota,pos,es,numero,ultimaEstrazione,estrazioneIniziale,estrazioneFinale
Dim numeriRicerca(5),posizioni(5)
Dim i,j,n,posIndex
Dim conteggioNumeri(90),risultato(6,15)
Dim valore,ce,tipo
Dim...
Buongiorno, Buon anno a tutti
X mastrogino devi modificare questa riga
G= G+1 : ImpostaGiocata G,Nu,Ru,Po,Co ',1 basta mettere apostrofo prima della op.1 (indica ferma giocata all' uscita ambata).
Saluti.