Contatori

[Magicolotto]

Ciao ragazzi ho un piccolissimo problema

in un form ho 50 txtFields()

in queste compaiono solo numeri presi da archivio access

in essi dovrei ricercare dele condizioni

a tal proposito ho scritto un contatore che è il seguente :

For i = 1 To 41 Step 5 ' parte a contare da bari fino a torino
For j = i To j + 4
For u = i + 5 To 46 Step 5 'questa parte da cagliari fino a venezia
For p = u + 1 To u + 4
numero1= adoPrimaryRS(j)
numero2= adoPrimaryRS(p)

condizione = abs( numero1-numero2)
if condizione= 30 then[/QUOTE]

praticamente come si leggesopra la differenze deve essere = a 30

cmq non trova tutti i casi allego immagine dove ho evidenziato con cerchio rosso i numero

9 e 39
39-9 =30

essi non vengono rilevati

non riesco a capire il xchè

mi aiutereste??