EIn Beispiel, hoffentlich verständlich

Code:
Dim Inpt As String * 20
Dim Utp As String * 20
Dim Va As Integer

   Va = 123
   Inpt = Str(va)
   Utp = Format(inpt , "000000")
   Print Utp