Går det i VB att känna av om ett tal är ojämnt? Det är enkelt att kolla om ett tal är ojämnt i vb: Tack för hjälpen med kollen på ojämna tal..Men problemet kvarstår lite med tanke på att man inte vet om vb avrundar neråt eller uppåt när det är ett ojämnt tal... HejKänna av ojämnttal + avrundning?
Om man har en Integer och delar tex
9/2 = 4
och
11/2 = 6
Varför avrundar den neråt ibland och uppåt ibland?
Tacksam!Sv: Känna av ojämnttal + avrundning?
If TAL Mod 2 = 0 Then
'Jämnt tal
Else
'Ojämnt tal
End If
Eller den lite snabbare varianten om du enbart jobbar med heltal:
If NOT (TAL AND 1) Then
'Jämnt tal
Else
'Ojämnt tal
End If
Varför avrundningen är lite lustig har jag dock inget bra svar på, vb borde avrunda alla udda-tal uppåt vid en division av två...
Ja, en tredje varinat för att testa ojämnt / jämnt finns också (funkar enbart på heltal):
IF CINT(TAL / 2) = CDBL(TAL / 2) THEN
'Jämnt tal
Else
'Ojämnt tal
End IfSv: Känna av ojämnttal + avrundning?
Har du ngt tips på det??Sv: Känna av ojämnttal + avrundning?
Testade kan inte få fram det du beskriver
Om du alltid avrunda nedåt så skriv Int(9 / 2), alla variabler skall vara
deklarerade. Om du delar heltal skall du skriva 11 \ 2