U konstrukce If...ElseIf...ElseIf...End If se vždy splní první podmínka, která vyhovuje, ostatní se ignorují. Pokud chcete splnit všechny, udělejte je jako samostatné IFy za sebou. Pokud chcete splnit jen poslední, uveďte podmínky v obráceném pořadí (nejdřív Mod 3, pak Mod 2 atd.). Dělat Mod 1 je úplně zbytečné, vždycky to vrátí 0 a podmínka se nikdy nesplní. A mimochodem podmínka by měla být typu Boolean, ale vy tam cpete Int. i Mod 2 dá výsledek typu Int, vy chcete Boolean. Mod vrací zbytek, to znamená i je dělitelné 2, pokud i Mod 2 = 0. A tohle musíte testovat.
|