Alien.
Advanced Premium Member
Sub Main
ImpostaArchivio10ELotto(2)
ReDim aN(11)
aN(1) = 2
aN(2) = 19
aN(3) = 10
aN(4) = 69
aN(5) = 48
aN(6) = 55
aN(7) = 16
aN(8) = 59
aN(9) = 57
aN(10) = 29
aN(11) = 22
Call ImpostaGiocataDL(1,aN,1,5) ' giocata 1,numeri,costo bolletta,durata
'-----------------------------------------
ReDim aN(7)
aN(1) = 8
aN(2) = 12
aN(3) = 16
aN(4) = 36
aN(5) = 48
aN(6) = 65
aN(7) = 89
Call ImpostaGiocataDL(2,aN,1,5)
'------------------------------------------
' prosegui con le redim inserendo altre giocate
Call GiocaDL(EstrazioniArchivioDL - 5) ' gioca da estrazione finale - 5 (qua mi da errore)
Call ScriviResocontoDL(True)
End Sub
per il lotto serale va bene archivio10elotto(2) oppure (1) ?
grazie.
ImpostaArchivio10ELotto(2)
ReDim aN(11)
aN(1) = 2
aN(2) = 19
aN(3) = 10
aN(4) = 69
aN(5) = 48
aN(6) = 55
aN(7) = 16
aN(8) = 59
aN(9) = 57
aN(10) = 29
aN(11) = 22
Call ImpostaGiocataDL(1,aN,1,5) ' giocata 1,numeri,costo bolletta,durata
'-----------------------------------------
ReDim aN(7)
aN(1) = 8
aN(2) = 12
aN(3) = 16
aN(4) = 36
aN(5) = 48
aN(6) = 65
aN(7) = 89
Call ImpostaGiocataDL(2,aN,1,5)
'------------------------------------------
' prosegui con le redim inserendo altre giocate
Call GiocaDL(EstrazioniArchivioDL - 5) ' gioca da estrazione finale - 5 (qua mi da errore)
Call ScriviResocontoDL(True)
End Sub
per il lotto serale va bene archivio10elotto(2) oppure (1) ?
grazie.