write a function to pad the number. Send it the number and an integer value representing the length it should be in characters.

VB Code:
  1. Public Function LPAD (sNumber as String, Length as Integer) as String
  2.  
  3. LPAD = String$(Length - Len(sNumber) , "0") & sNumber
  4.  
  5. End Function