Avatar billede bodekaer Nybegynder
19. oktober 2002 - 14:13 Der er 3 kommentarer og
1 løsning

Tjekke om en bit indgår i en byte... :)

Hvordan tjekker jeg let om f.eks. bit 4 indgår i en byte?

Jeg har følgende kode (bare et eksempel):

        byteDays = RS("period-days")
        For i = 7 To 1 Step -1
            If byteDays >= i ^ 2 Then
                byteDays = byteDays - i ^ 2
                chkDays(i - 1).Value = 1
            End If
        Next


Det virker fint, men jeg ville høre om der ikke findes en lettere løsning? (jeg vil nemlig gerne tjekke det via SQL)
Avatar billede johs_j Novice
19. oktober 2002 - 18:10 #1
if byteDays and 4^2 <>0 then
  msgbox "Bit nr 4 er sat til 1"
end if
'eller
if byteDays and bitnr^2 <>0 then
  msgbox "Bit nr " & bitnr & " er sat til 1"
end if
Avatar billede bodekaer Nybegynder
20. oktober 2002 - 16:54 #2
Kan du så forklare hvorfor følgende kode giver 1?

MsgBox (4 ^ 2 + 1 ^ 2 + 2 ^ 2) And 3 ^ 2
Avatar billede johs_j Novice
20. oktober 2002 - 20:15 #3
'Min kode er desværre forkert, men den skulle virke nu.
if byteDays and 2^4 <>0 then
  msgbox "Bit nr 4 er sat til 1"
end if
'eller
if byteDays and 2^bitnr <>0 then
  msgbox "Bit nr " & bitnr & " er sat til 1"
end if
Avatar billede bodekaer Nybegynder
20. oktober 2002 - 21:44 #4
Fornemt, det fungerer.

Tak for hjælpen.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

IT-JOB