Android Question Int to 7bit and 10bit binary converter

[Cableguy]

Hi guys

I need to convert an integer to both a 7bit and 10 bit binary string representation.
But... I don't have the foggiest idea how to do it.
any help apreciated

 

[JordiCP]

Sub int2Bin(num As Int, digits As Int) As String

    Dim s As String
   
    For k=0 To digits-1
        If Bit.AND(num,1)=1 Then
            s="1"&s
        Else
            s="0"&s
        End If
        num=Bit.ShiftRight(num,1)
    Next
    Return s
End Sub

 

[Cableguy]

Just before I read your solution I came up with:

Sub int2bin(value As Int, base As Int) As String
   Private x As String
   x = Bit.ToBinaryString(value)
   If x.Length < base Then
     Do Until x.Length = base
       x= "0" & x
     Loop
   End If
   Return x
End Sub

But thanks for taking the time to help me

 

[JordiCP]

Funny enough, I often use Bit.### methods but had not seen this one