[VB.Net] Comment implémenter une fonction BitWise ?

Bonjour,
Je voudrais faire ce genre de truc :

J'ai une variable x qui vaut 5 par exemple.
Je voudrais faire une boucle de 0 a 5 pour voir si ces valeurs sont contenues dans 5.
par exemple 4 n'est pas contenue dans 5: 2^4 = 16 > 5
2 est contenu dans 5 : 2^2 = 4 < 5

Comment puis je faire ca ?

Merci

Je ne voi pas vraiment, quesque tu cherche exactement...
Si c'est la fonction puissance c'est

Code:

---

Result=Math.pow(Nombre,Puissance)

---

si c'est autre chose faut préciser... bon travail...

Euh j'ai pas compris:

Citation:

---

4 n'est pas contenue dans 5

---

Si j'ai bon souvenir, 5 c'est 101 et 4 c'est 100 donc 4 est dans 5 en binaire ...
Tu as l'opérande And et Or pour tester les bits

ha non c 'est pas du tout la fonction puissance que je cherche :)
c'est plutot la fonction bitwise...

Bon voici mon probleme:
J'ai une table avec des id's:
0
1
2
3
...

J'ai une autre table qui contient dans l'un des champs un chiffre (disons 4) qui correspond au code bitwise des id's de la premiere table. En qq sorte si j'ai 4 cela veut dire que je dois selectionne les champs 0, 1 et 2 de ma premiere table car :
2^0 = 1 < 4
2^1 = 2 < 4
2^2 = 4 = 4 (les valeurs egales sont autorisees)

donc je fais une loop sur tous les id's et je verifie ce que je viens d'expliquer. Mais c'est possible de le faire avec un simple AND:
0 AND 4
1 AND 4
2 AND 4

J'arrive juste pas a faire marcher ca (je dois pas comprendre commen ca marche )


Merci

if 1 and 4=1 then le bit 1 est positionné
if 2 and 4=2 then le bit 2 est positionné
etc...

Si j'ai bien compris tu doit à partir d'un tableau de id's et d'un Nombre X obtenir un autre tableau contenant les Nombres correspondant au code bitwise du Nombre X...
Si c'est ça, ton probleme est don algorithmique tu fais un truc du genre:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

private sub MaFonction (ByVal TableauEnEntree as integer(), ByVal LeNmbre as integer, ByRef TableauResult as integer()) ...... For i=0 to LeNmbre A=Math.pow(2,TableauEnEntree(i)) If A<= LeNombre then TableauResult (i)=A else exit Sub endif Next end sub

---

le resultat est dans le tableau TableauResult...

ld9474 > merci je pense que c'est ce que je veux

zitoun> dsl mais non c'est pas ce que je cherche a faire :wink:

:merci: