Visual Basic Programming Code Examples Visual Basic > API and Miscellaneous Code Examples Converting numbers Converting numbers * Hexadecimal to Decimal: Sub Form_Load () Dim x as String Dim y as Variant x = "fffe" y = CLng("&H" & x) If y < 0 Then y = y + 65536 ' returns 65534 MsgBox y End Sub * Converting a string to an integer: Cal Stover Dim SomeVariable as Integer SomeVariable = CInt(Label2.Caption) + 100 Dim SomeVariable as Single SomeVariable = CSng(Val(Label2.Caption) + 100) * convert a number in Hexadecimal to Binary -chris A very fast conversion from hex to binary can be done with a sixteen element look-up table - a single hex digit converts to four binary digits. So: Function Hex2Bin$(HexValue$) CONST BinTbl ="0000000100100011010001010110011110001001101010111100110111101111" dim X, Work$ Work$ = "" For X = 1 to Len(HexValue$) Work$ = Work$ + Mid$(BinTbl, (Val("&h" + Mid$(HexValue$, X, 1) - 1) * 4 + 1, 4) Next Hex2Bin$ = Work$ End Function You could also code BinTbl as an array which would eliminate one of the Mid$() calls, but then the array would either have to be built ahead of time or built every time you called the Hex2Bin function. You could try all three options and see which is faster. Return