After Update on Form to Reduce Number of Digits

[WILTSBOY]

I have a field called Supplier_Number that is being used on an input form.


I would like to ensure that 9 digits are always input into this field including any lead in zeros. Error message to be shown if 9 digits not input.
I believe an After Update function can be used with Code.
Could someone advise me what Code I could use in the Code Builder?
Thank you.

[isladogs]

No code needed
Format the textbox on your form as 000000000
Leading zeroes will be added automatically after data is added

[WILTSBOY]

Hi,
I tried that but if a user searches for the record via a query then the lead in zeros are ignored.

[isladogs]

Hi,
I tried that but if a user searches for the record via a query then the lead in zeros are ignored.

Format the field in the table design using that format
If say 123 is entered using form or table it will be displayed as 000000123
It will then work if you enter either value as the filter criterion using a query.
Note that if the long version is used, Access will remove the leading zeroes in the filter criteria but still display the result

[ArviLaanemets]

When you need the supplier_number to be a text field in your table, then you have to write OnLostFocus event for text box

Private Sub Text0_LostFocus()
    Me.supplier_number = Right("000000000" & Me.supplier_number, 9)
End Sub

or

Private Sub Text0_LostFocus()
    Me.supplier_number = Format(Me.supplier_number, "000000000")
End Sub

But you have to remember, that the field is now a text. E.g. to calculate a numeric value bigger on 1 you have to use the formula

=CInt([supplier_number])+1

And for text string like supplier_number, but bigger on 1

=Format(CInt([supplier_number])+1,"000000000")

Btw, with Format function you can have various delimiters for grouping numbers in text field. And when you use only spaces for delimiters, you can convert those strings to numbers - CInt() works without problems (for me, I'm not sure about US settings - maybe with them it works with commas only in such way).
So when you use format "00 000000 0" and enter 12345, you get the string "00 001234 5", and CInt(([supplier_number]) returns 12345.
When you use format "000 000-000" and enter 123245, you get the string "000 012-345", and CInt(([supplier_number]) returns an error.

[isladogs]

That's all very well Arvil but not necessary for this situation.
The field can be a number field but still be shown with leading zeroes at table and query level
See attached for a very simple example