VB 10進数と2進数を変換する表紙 > VB6 サンプル > VB6 10進数と2進数を変換する １．10進数→2進数 以下の関数Convert10to2を使うと、10進数を2進数を表現する文字列に変換できる。 たとえば、Convert10to2(5) = "101" となる。 '■Convert10to2 '■機能：10進数を2進数に変換する。 Private Function Convert10to2(Value As Long) As String Dim lngBit As Long Dim strData As String Do Until (Value < 2 ^ lngBit) If (Value And 2 ^ lngBit) <> 0 Then strData = "1" & strData Else strData = "0" & strData End If lngB
