Supersimpelt: Format-funktion

Jeg har en løkke hvori jeg gerne vil skrive tællerens værdi til en variabel, hvor der anvendes et bestemt format. Det kan man gøre ved :

For i = 1 to 1000
  MitArray(i) = Format(1,"0000")
Next i

Således vil der i MitArray stå 0001, 0002, ... osv.

Men - jeg ved ikke på forhånd hvor mange "pladser" med nuller jeg vil have. Ovenfor er 4 pladser, men det afhænger af hvad der står i en anden variabel, AntalNuller.

Hvordan gør man det?

PS. En Select Case på AntalNuller er ikke den løsning jeg søger ;o)