Visual Basic 6 has the Hex function, but no Bin or Oct, so I wrote the silly functions bellow, just to have a bit of fun. Option Explicit Public Function Bin(ByVal lngNumber As Long) As String Do While lngNumber > 0 Bin = (lngNumber Mod 2) & Bin lngNumber = lngNumber \ 2 Loop If (Len(Bin) Mod...