[Resolvido]Digitar uma letra ou numero e aparecer outra em campo

Aqui estou eu novamente.
Estou criando um validador para meu programa em access, mais uma vez parei em uma dificuldade.

Preciso que ao digitar um valor de numeros e letras em um campo ele preencha outros numeros em outro campo, Exemplo:

A = 5
B = 3
T = 1
1 = 9
2 = B

No Texto1 digito "A2TB1" e no Texto2 aparece "5B139", como posso fazer nesse caso?

Boa tarde amigo. Faça assim.
Após atualizar de sua txt coloque

if me.texto1 = "A2TB1" then
me.texto2 = "5B139"

end if


teste assim..

os caracteres são variaveis, as letras não sequem uma sequencia, no caso que voce me informou é apenas para um campo já com valor predeterminado.

Olá, não ficou muito claro pra mim seu pedido de ajuda. se possível postar as partes envolvidas no problema e explique detalhadamente a tua necessidade.

estou criando um sistema de chave para validar meu programa.
fiz com oque o sistema gerasse automaticamente uma identidade para validar a chave.
por exemplo:

IDENTIDADE: B6747F

a chave deve sair da seguinte maneira:

Primeira Parte
BZZYYX Que corresponde a data atual

B = 3
Z = 0
Z = 0
Y = 1
Y = 1
X = 4 Ou seja eu digito no campo Texto0: BZZYYX e no campo Texto1 com o formato "data" vai aparecer 30/01/14

Segunda Parte
5ARXT2 Que corresponde à Identidade da Maquina

5 = B
A = 6
R = 7
X = 4
T = 7
2 = F Ou seja eu digito no campo Texto2: 5ARXT2 e no campo Texto3 vai aparecer a identidade da maquina B6747F

Terceira Parte
BZZFYX Que corresponde à data de vencimento da chave.

B = 3
Z = 0
Z = 0
F = 2
Y = 1
X = 4 Ou seja eu digito no campo Texto4: BZZFYX e no campo Texto1 com o formato "data" vai aparecer 30/02/14

Então quando eu digitar a chave: BZZYYX - 5ARXT2 - BZZFYX
Na verdade vai aparecer: 30/01/14 - B6747F - 30/02/14

Vou salvar esse registro e uma tabela e colocar o formulario para validar se a data de vencimento for < data atual.

Amigo, desculpa, mas sugiro que poste os objetos envolvidos no pedido de ajuda para que possamos entender melhor qual é o raciocínio de tua necessidade.

Não tem como postar porque não criei nada ainda nesta parte do meu bd, estava aguardando algo mais facil para fazer isso, mas vou criar um campo para cada letra e usar o if para alterar seu valor ao digitar ele recebe o valor diferente em outro campo depois somo tudo, não é o melhor caminho mas dá pra fazer.

Não foi necessário fazer campo a campo.
Achei um topico aqui que o criquio ajudou, e bate com oque eu preciso usando o replace.

Me.NomeCampo2 = Replace(Replace(Replace(Me.NomeCampo1, "A", "1"), "B", "2"), "C", "3")