• Home
 · 
• Math/Dates
 · 
• Converts a binary number to decimal.

Converts a binary number to decimal.

Converts a binary number to decimal.

API Declarations


'Dim Resultado, Bit, Potencia As Integer
'i = Len(Binario) 'lenght of the binary sent
'While i <> 0 '
'Bit = Mid(Binario, i, 1) 'if the string is 1101111 and the value of 'i' is 3 then, the instruction will return '0'
' If Bit = 1 Then Resultado = 2 ^ Potencia + Resultado
' Potencia = Potencia + 1
' i = i - 1 'read the next bit
'Wend
'Binario = Resultado 'now, the binary number will be a decimal number
'End Function



Rate Converts a binary number to decimal.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

'Combinacion="1101111"
'call Bin2Dec(Combinacion)
'text1.text=combinacion

''[email protected]