And ed or nell'if

[laugher]

---codice ---

Dim contatore, a, b
contatore = 0
if ((a=1) and (b=5)) or ((a=5) and (b=1)) then
contatore = contatore+1
end if

--- fine codice ---

Io vorrei che il contatore si incrementi se

a=1 E b=5 (ENTRAMBI)

OPPURE SE

a=5 E b=1 (ENTRAMBI)

ma l'istruzione sopra non gira.

Mi sapete dire perchè per favore?

Grazie mille.

[willybit]

cosa vuol dire "non gira"? presumo che quel pezzo di codice si trovi in un ciclo. Dovresti postare più codice.
come vengono valorizzati "a" e "b"?
Fatti scrivere i valori di a e b per verificare

[laugher]

Originariamente inviato da willybit
cosa vuol dire "non gira"? presumo che quel pezzo di codice si trovi in un ciclo. Dovresti postare più codice.
come vengono valorizzati "a" e "b"?
Fatti scrivere i valori di a e b per verificare

I valori di a e b sono a posto e sono stati verificati facendoglieli scrivere. Se io metto quella riga senza l'OR il programma gira.

Ci metto l'or ed il programma non mi dà alcun risultato. Riga bianca.

[Vincent.Zeno]

assicurati che i dati confrontati siano dello stesso tipo: testo o numero che sia

[willybit]

in quello che hai postato non c'è niente di sbagliato.
per evitare problemi di confronto sul tipo di dati trasforma tutto in stringa

if (a&""="1" and b&""="5") or (a&""="5" and b&""="1") then
	contatore = contatore+1
end if

se anche così continui ad avere problemi allora dovrai postare più codice perché qualcuno possa aiutarti

[laugher]

E' andato tutto a posto. Il problema era che usavo + in basso un altro parametro. Ho invertito anche quello e tutto gira a meraviglia. Grazie a tutti.