Novità

verificaesitoSE

genios

Advanced Member >PLATINUM PLUS<
Come si usa la funzione verificaesitoSE per controllare l' esito di una matrice bidimensionale di numeri ?
Nel senso quale è l', esito del primo gruppo di numeri e quale l' esito del secondo gruppo di numeri?

Codice:
Sub Main

    Dim Ini
    Dim aNumeri(10,2) ' matrice bidimensionale dei numeri in gioco

    aNumeri(1,1) = 1
    aNumeri(2,1) = 10
    aNumeri(3,1) = 19
    aNumeri(4,1) = 28
    aNumeri(5,1) = 37
    aNumeri(6,1) = 46
    aNumeri(7,1) = 55
    aNumeri(8,1) = 64
    aNumeri(9,1) = 73
    aNumeri(10,1) = 82

    aNumeri(1,2) = 2
    aNumeri(2,2) = 11
    aNumeri(3,2) = 20
    aNumeri(4,2) = 29
    aNumeri(5,2) = 38
    aNumeri(6,2) = 47
    aNumeri(7,2) = 56
    aNumeri(8,2) = 65
    aNumeri(9,2) = 74
    aNumeri(10,2) = 83

     For Ini = 1 To EstrazioniArchivioSE ' gioco su tutto l'archivio

        Call ScriviEstrazioneSE(Ini,True) ' scrivo l'estrazione di cui sto verificando l' esito

    Next
End Sub

Cordiali saluti
Eugenio
 
Buonanotte,
forse potrebbe inserire i numeri delle matrici in un Array.
dopo di che , farlo passare in VerificaEsitoSE
 
Scusa Magia non so se erro ma Dim aNumeri(10,2) è gia un Array di 10 righe e 2 colonne . Quello che vorrei fare è verificare l' esito dei 10 numeri della colonna 1 e dei 10 numeri della colonna 2 e avere in out i risultati che hanno prodotto ad ogni estrazione .

Ciao Eugenio
 

Ultima estrazione Lotto

  • Estrazione del lotto
    venerdì 19 dicembre 2025
    Bari
    31
    29
    78
    66
    61
    Cagliari
    45
    72
    65
    38
    35
    Firenze
    80
    01
    33
    11
    36
    Genova
    15
    81
    02
    47
    83
    Milano
    88
    52
    04
    76
    24
    Napoli
    10
    72
    37
    58
    07
    Palermo
    78
    05
    34
    48
    35
    Roma
    23
    22
    42
    75
    02
    Torino
    73
    59
    48
    47
    70
    Venezia
    02
    78
    31
    38
    72
    Nazionale
    04
    28
    85
    60
    57
    Estrazione Simbolotto
    Venezia
    30
    10
    43
    28
    21
Indietro
Alto