Mascara de entrada para situações com quantidade de caracteres diferentes

Amigos do forum, venho solicitar uma ajuda.
Preciso de código para situações para mascara de entrada com quantidade de caracteres diferentes, vou explicar!
tenho um formulário onde tenho o cadastro do produto e um subformulario onde são registrado as entradas deste produto, neste subformulario a entrada e via leitor de código de barras onde eu faço a comparação da entrada com o cadastro, porém coloquei uma mascara de entrada para que seja respeitado a quantidade de caracteres (letras + números)ex:"000000000LLL000000", o que me acontece agora e o seguinte tenho produtos onde a quantidade de letras é menor então gostaria de um código onde a mascara de entrada seja colocado conforme o cadastro.

Desde já agradeço

Olá Pauliano,

No evento Ao Sair de seu campo, coloque este código:

Exemplo: Suponhamos que o nome de seu campo seja Codigo (do tipo Texto). Tem que ser do tipo Texto, OK?!!!

Private Sub Codigo_Exit(Cancel As Integer)
On Error Resume Next
Dim sCod As String
sCod = Len(Codigo)

Select Case sCod
Case Is = 5
Codigo.InputMask = "0000AA"
Case Is = 6
Codigo.InputMask = "00000AA"

.....
End Select

Para cada registro ficará especificado o comprimento e o formato de sua máscara de entrada.

End Sub