convert dint to boolean array

 	Dim MyDint As Int32 = 32
    Dim oByteArray As New System.Collections.BitArray(System.BitConverter.GetBytes(MyDint))