Hej

Kolla udda och jämna tal hur görs detta i vb6?

/
Tobbe

If talet Mod 2 = 0 Then
'talet är jämnt
Else
'talet är udda
End If

if tal and 1 then
'udda
else
'jämt
end if

Den är snabbast ifall du skall ha den i en loop, dock så kan du inte testa med mer än just jämt/udda...

eller (bara för att bidra med fler sätt , även om det är idiotiskt)


if int(tal/2)=tal/2 then
..
else
...
end if



//Roger

>dock så kan du inte testa med mer än just jämt/udda...
Jä.... Bull Det var ju det som var grundfrågan !

Måste dock medge att Onkelborgs lösning är bäst/effektivast !

Måste tillägga att eftersom att modulus går att använda för att få tag på t.ex. alla tal som är delbara med 3, 4, 5 etc. så kan modulus vara bättre på den punkten... Det var det jag syftade på... Med and så fungerar det bara med jämt/ojämt