Format string output

[awelch]

Simple problem, but I just can't seem to get it right.

I have some data that I am inputting into a table set up as a text field. Some of the data is numeric however and whenever input into the tables the first 0 if there is one is dropped. How do I format this to keep the first 0 or multiple 0's if there are any?

Here is the code I am using:

For i = Val(strLow) To Val(strHigh)
      SQL = "Insert Into TPCT_OUTPUT (TPCT_IPCD_FILL)Values(" + CStr(strLow) + ")"
      CurrentProject.Connection.Execute SQL
      strLow = strLow + 1
Next

Thanks for your help!

Andrea

 

[RickSpr]

The CStr(strLow) is deleting the leading zeros. Replace it with Format$(strLow, "00000000&quot, specifying as many zeros as you want digits.

For more information, see the Access 97 help topic "User-defined numeric formats (Format function)".

Rick Sprague
Want the best answers? See faq181-2886
To write a program from scratch, first create the universe. - Paraphrased from Albert Einstein