[Resolvido]adicionar registro numerico com zero a esquerda

Senhores

Tenho um campo texto, onde é digitado somente número, com mascara de entrada 999999. O usuário ao digitar no campo, por exemplo "1", que seja salvo na tabela o valor "000001". alguem pode me ajudar?

obrigado senhores

mas procurando na net, achei esse codigo que fez o que eu precisava, obrigado.

Dim Cont As String
Cont = 6 - Len(Me.txtnumcaixa)
If Cont > 0 Then
Do While Cont > 0
Me.txtnumcaixa = 0 & Me.txtnumcaixa
Cont = Cont - 1
Loop
End If

Olá, Experimente

Format (NomeCampo, "000000")