FreeVBCode code snippet: Convert a numeric value to binary