BitWise split?

[Fredrik Melin]

Hi,

Is there any easy way to split a bitwise value, for sample 127 to an array
into 1, 2, 4, 8, 16, 32, 64?

Regards
Fredrik Melin

 

[Fredrik Melin]

Nevermind, found it easy to do it in a FOR loop.

 

[Cor Ligthert]

Frederik,

Better is in my opinion when you found it yourself to change the subject,
now it can look as an addition. However I am glad you sand this of course
and that you found your solution.

Cor

 

[Herfried K. Wagner [MVP]]

Is there any easy way to split a bitwise value, for sample 127
to an array into 1, 2, 4, 8, 16, 32, 64?

Why would you "split" 127 to these numbers?

 

[C-Services Holland b.v.]

Why would you "split" 127 to these numbers?

bitwise comparison. Alot of flags for API calls work that way.
That way you can pass alot of options with one integer (16 bit
integer=16 options).

 

[Herfried K. Wagner [MVP]]

bitwise comparison. Alot of flags for API calls work that way.
That way you can pass alot of options with one integer (16 bit integer=16
options).

Well, I know that, but I was slightly irritated by the "split" in the
subject.

 

[chanmmn]

Hope this can help you but you need to shift with 128 and you never mention
what data type is your array so I use Integer for the example:

Dim arr(128) As Integer
Dim arr1(128 >> 1) As Integer
Dim arr2(128 >> 2) As Integer
Dim arr3(128 >> 3) As Integer
Dim arr4(128 >> 4) As Integer
Dim arr5(128 >> 5) As Integer
Dim arr6(128 >> 6) As Integer
Dim arr7(128 >> 7) As Integer

chanmm