2進数に変換してみる - abwiki @ ウィキ (ActiveBasic非公式wiki)

#N88BASIC
Print Bin$(4294967294)

Function Bin$(i As Long) As String
Dim j As Long
Bin$=""
For j=31 To 0 Step -1
If i And Int(2^j) Then Bin$=Bin$+"1" Else Bin$=Bin$+"0"
Next
End Function