Přepínání hodnot mezi 1 a 0 – Visual Basic – Fórum – Programujte.com

Zdravím programátory,
nemůžu rozlousknout jednoduchý logický problém. Když je splněna jednoduchá podmínka řekněme x=1 potřebuji aby y=1 (zde problém není)

If x=1 then
y=1
End If

Problém je v tom, že pokud se znova x=1 potřebuji aby se nyní y=0. Pokud bude znovu x=1 bude y=1 (opět) - potřebuji, aby se hodnota "y" přepínala mezi 1 a 0 pokaždé když je splněna podmínka x. Když jsem to zkoušel přes další podmínky ve výsledku se mi přepínání vyrušilo a y mělo např. stále honodtu 0.

Díky za každou radu,
Pavel.

Řešil bych to třeba tak, že bych si nadefinoval pomocnou proměnnou, říkejme jí třeba z. Po každém if bych ji inkrementoval o jedničku. Ke kontrole, jestli se x=1 bych přidal ještě něco ve stylu z%2=0 (modulo, to zjistí zbytek po dělení). Prostě a jednoduše - u celých čísel se zbytek po dělení střídá - jednou je nula, pak jedna, pak nula, pak jedna... Přesně tuhle vlasnost bych využil:)

Velice chytré rešení ;-) díky za pomoc.

Ak premenná y nadobúda iba hodnoty 0 alebo 1, tak ju neguj. V tej podmienke ktorú uvádzaš hore, vlož: y = NOT y
Lekcia VB 12.3 ;)