Is there any routine that can translate a number (0-255) to a bitmap 0101010110?

For example, I would like that if the number is 3, then when I call the function, I get the result 00000011 somehow, or if the number is 255, then I get 11111111.

I know I can calculate it myself by dividing by 2 until finished,, but I am just wondering if I could get a bitmap by calling the function in VB instead.

Thanks