Format a number with leading blanks

[SHIPP]

How do I format a number in a query so that I left fill a number with blanks.
In other words if I have the number 22 I want 9 blanks in front of it. If I
have the number 101 I want 8 blanks in front of it. If I have the number 7 I
want 10 blanks in front of it. I'm using Access 97. Thanks in advance.

 

[SHIPP]

I solved the problem with the following code.


Public Function FillField(lngFld As Long) As String

Dim strFld As String

strFld = Trim(CStr(lngFld))

While Len(strFld) < 11
strFld = " " & strFld
Wend
FillField = strFld

End Function

 

[Klatuu]

Space(11 - Len(cstr(MyNumber)))& Cstr(MyNumber)

 

[Alex Dybenko]

intI=5

strFormated= space(11-len(intI & "")) & intI

--
Best regards,
___________
Alex Dybenko (MVP)
http://alexdyb.blogspot.com
http://www.PointLtd.com

 

[Douglas J Steele]

Just to be different <g>

strFormated= Right$(space(11) & intI, 11)

 

[Alex Dybenko]

Smart!
nice solution Doug!

--
Best regards,
___________
Alex Dybenko (MVP)
http://alexdyb.blogspot.com
http://www.PointLtd.com

 

[Tim Ferguson]

How do I format a number in a query so that I left fill a number with
blanks.

Me too:

right$(format(myNumber,string$(11," ") & "0"),11)

Tim F