Solved

Convert integer into a bitarray?

Posted on 2004-10-04
6
694 Views
Last Modified: 2008-03-10
how can i turn say integer 129 into something like 10000001 that i can then loop through and tell whether it's a 1 or 0 at any point or on/off/whatever.  I can write all my own custom stuff if need be, but i didn't know if vb had something like this already?


like

dim test as integer = 129

dim test2 as arrayofsomesort

test2 = turntobits(test)

for a = 0 to test2.count - 1

if test2(a) = 1 then
'fire something here
end if

next

get where i'm doing?  real similiar to the concept of flags in Quake2 configs where to set certain options you add numbers and together and put taht number in your config.

Thanks,
Nick



0
Comment
Question by:NickUA
6 Comments
 
LVL 8

Accepted Solution

by:
gregasm earned 168 total points
ID: 12223194
Use static methods of the BitConverter class.

byte[] myBytes = BitConverter.GetBytes(myint);

Then you can use the byte array and go deeper into bits.
0
 
LVL 6

Assisted Solution

by:mogun
mogun earned 166 total points
ID: 12224159
Hi,

You don't have to loop through the bit array to check whether a bit is set or not.. Instead you can use bit operators to evaluate whether a bit is set or not....The following is code that uses && operator and << (left shift ) operators to evaluate whether a bit is set or not..

    Public Function IsBitSet(ByVal iConfig As Integer, ByVal iBitToCheck As Integer) As Boolean
        If (iConfig And (1 << (iBitToCheck - 1))) >= 1 Then
            Return True
        Else
            Return False
        End If
    End Function


iConfig is the integer number that you want to test...
iBitToCheck is the bit position that you want to check..

Let me tell you what the expression

iConfig And (1 << (iBitToCheck - 1))

mean...
Consider iConfig = 8 and iBitToCheck = 2

first take a look at (1<<(iBitToCheck -1 ))
This will left shift 1 by (iBitToCheck-1) times...
Hence this expression becomes
(1<<(2-1))
which becomes 1<<1, which mean left shift 1 by 1..
So 1 in binary format 00000001 becomes 00000010...
left shift makes the bits to move to the left side and adds a 0 on the right hand side..

now this will be "And" ed with 8 whose binary is 00001000
Hence
00001000 And
00000010 becomes
00000000 which is integer 0 ..
so the if fails and you get the result that bit 2 of 8 is not set..

Cheers
Mohan

Note: this code is not tested for all conditions..let me know if there are bugs..


0
 
LVL 96

Assisted Solution

by:Bob Learned
Bob Learned earned 166 total points
ID: 12252795
BitVector32 class also.

Bob
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Welcome my friends to the second instalment and follow-up to our Minify and Concatenate Your Scripts and Stylesheets (http://www.experts-exchange.com/Programming/Languages/.NET/ASP.NET/A_4334-Minify-and-Concatenate-Your-Scripts-and-Stylesheets.html)…
This document covers how to connect to SQL Server and browse its contents.  It is meant for those new to Visual Studio and/or working with Microsoft SQL Server.  It is not a guide to building SQL Server database connections in your code.  This is mo…
Windows 10 is mostly good. However the one thing that annoys me is how many clicks you have to do to dial a VPN connection. You have to go to settings from the start menu, (2 clicks), Network and Internet (1 click), Click VPN (another click) then fi…
Hi friends,  in this video  I'll show you how new windows 10 user can learn the using of windows 10. Thank you.

911 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

17 Experts available now in Live!

Get 1:1 Help Now