Oppure

Loading
24/06/08 5:40
magicolotto
CIAO RAGAZZI.... buon giorno

nel mio archivio

utilizzo questo codice per ricavare il numero + frequente nelle ultime estrazioni da me desiderate

Do Until rs.EOF

    conteggio(rs("BA1")) = conteggio(rs("BA1")) + 1
    conteggio(rs("BA2")) = conteggio(rs("BA2")) + 1
    conteggio(rs("BA3")) = conteggio(rs("BA3")) + 1
    conteggio(rs("BA4")) = conteggio(rs("BA4")) + 1
    conteggio(rs("BA5")) = conteggio(rs("BA5")) + 1

    rs.MoveNext
Loop

For ix = 1 To 90
If conteggio(ix) >= presenze Then
  List2.AddItem conteggio(ix) & " presenze del : " & ix


nella listbox mi vengono fuori il numero con le sue presenze



vorrei migliorarlo


vorrei trovare oltre i numeri piu' frequenti che gia mi trova..

vorrei sapere quali numeri ad esso si sono abbinati per ambo

cioè quali numeri sono stati piu freaquenti ad uscire al numero piu frequenti


capito?
aaa
24/06/08 6:31
antometal
no
fammi un esempio
aaa
24/06/08 7:30
magicolotto
Do Until rs.EOF 

    conteggio(rs("BA1")) = conteggio(rs("BA1")) + 1 
    conteggio(rs("BA2")) = conteggio(rs("BA2")) + 1 
    conteggio(rs("BA3")) = conteggio(rs("BA3")) + 1 
    conteggio(rs("BA4")) = conteggio(rs("BA4")) + 1 
    conteggio(rs("BA5")) = conteggio(rs("BA5")) + 1 

    rs.MoveNext 
Loop 

For ix = 1 To 90 
If conteggio(ix) >= presenze Then 
  List2.AddItem conteggio(ix) & " presenze del : " & ix 

questo codice mi trova il i numeri con maggiore uscita sulla ruota di bari
rs("BA1";)
rs("BA2";)
rs("BA3";)
rs("BA4";)
rs("BA5";)

mi scrive
data uscita , numero uscito, numero di presenze

esempio :
21/06/2008 (+ date) , 14 presenze 4

adesso pero' dovrei implementare il codice

mettendo come risultato

i numeri che si sono abbinati di piu' al 14 nelle date in cui lui è stato trovato


aaa
24/06/08 7:53
antometal
intanto devi trovare tt i numeri che si sono abbinati al "14", dopodichè conti quante volte sono usciti (col 14) questi numeri

es

1 8 14 20 30
7 9 14 20 89
1 8 14 18 89
1 5 14 20 65

i numeri abbinato ordinati sono:
1 1 1 5 7 8 8 9 18 20 20 20 30 65 89 89
poi li conti e se tieni quelli usaciti + d 2 volte
avrei 1x3 e 20x3
aaa
24/06/08 8:42
magicolotto
si infatti

hai capito al volo




solo che non so impostare i vari contatori.....
aaa
24/06/08 11:29
magicolotto
si ho letto grazie

me lo devo studiare bene


molto complesso

vi diro'

cerco di impostarlo
aaa
24/06/08 12:34
antometal
ok
fammi sapere se hai bisogno
aaa