leading zeros...

[dodgyone]

Hi, I've created a field in a table using VBA but
I now need to alter the format.

It's VBLong and I want the format to be '0000'.

So, there are leading zeros depending upon the size of the number... ie:

0001
5463
0567
0057

and so on...

Thanks for the help...

 

[mikey69]

You need to input the data into a string field and convert it to a long integer if you need to manipulate it, by math, sorting and so on.

 

[TrojanRabbit]

In table design view, put 0000 in the Format property.

 

[dodgyone]

Thanks TrojanRabbit... i alrady know how to do that though.

I'm writing an automated procedure for a user group so I really need to do this with vb code to save them the hassle when they do the transfer.

 

[TrojanRabbit]

Per mikey's suggestion, you can use a string:
numstr = String(4 - Len(CStr(num)),"0&quot & CStr(num)

There's also Format(num, "0000&quot.