---

Hej NG

Jeg bruger denne kode, men ved egentlig ikke hvad den gør og er ret
nysgerig.

-----------------------------------------------
Counter = 0
while Not <recordset>.EOF
IF Counter Mod 2 = 0 THEN
'Den ene farve
Else
'Den anden farve
End If
Counter = Counter + 1
objRS.Movenext
Loop
-----------------------------------------------

Først sættes counter til 0.

Og så sker der noget indtil der ikke er flere rækker.

IF counter Mod =2=0 then (hvad betyder det?)

Til sidst lægges 1 til counter.

Er meget interesseret i hvad IF "counter Mod =2=0 then" gør.

Håber i kan hjælpe.

---

Jakob Olesen skrev:

> Og så sker der noget indtil der ikke er flere rækker.

Rækkerne udskrives på skift i to forskellige farver.

> IF counter Mod =2=0 then (hvad betyder det?)

Mod (modulus) betyder rest ved heltalsdivision.
Heltalsdivision (div) betyder blot at man smider brøken væk når man
dividerer.
Et par eksempler:
10 div 3 = 3
10 mod 3 = 1
4 div 3 = 1
4 mod 3 = 1
4 div 2 = 2
4 mod 2 = 0
5 div 3 = 1
5 mod 3 = 2

Generelt gælder det at
   (X div Y) * Y + (X mod Y) = X

Når X mod Y = 0 er det fordi Y går op i X.

> Er meget interesseret i hvad IF "counter Mod =2=0 then" gør.

X Mod 2 kan bruges til at afgøre om X er et lige tal eller et ulige
tal (X Mod 2 = 0 => X lige, ellers er X ulige). Det kan også - som
her - blot benyttes til at skifte mellem to tilstande.
Det bruges for eksempel til at lave et skema med vekslende farver i
rækkerne.
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

Jens Gyldenkærne Clausen skrev:
> X Mod 2 kan bruges til at afgøre om X er et lige tal eller et ulige
> tal (X Mod 2 = 0 => X lige, ellers er X ulige).

Ikke fordi det nødvendigvis er bedre, men en anden måde at se om et tal
er lige eller ej er at bruge den bitwise "og" operator, på denne måde kan
man se om der skal bruges "en ener" til at konstruere tallet i den binære
represæntation som tallet nu engang er opbevaret i på en computer.

Altså:

If mitTal AND 1 Then
'Ulige tal
Else
'Lige tal
End If

--
Jakob Andersen