Retornando números

No evento após atualizar, tenho o seguinte código:
A dúvida é a seguinte, quando digitado no campo txtCodigoProcesso esta me retornando numeros ao inves de texto, alguêm poderia me ajudar?
As tabelas já estão definidas como texto curto.
Abaixo imagem




Private Sub txtCodigoProcesso_AfterUpdate()

   Dim db As DAO.Database
   Dim rs As DAO.Recordset
   Dim strSQL As String
   
   Set db = CurrentDb()
   strSQL = "SELECT Data, TemaTreinamento, Duracao, Instrutor, Projeto FROM Consulta_Processos WHERE idCodigoProcesso = '" & Me.txtCodigoProcesso.Value & "'"
   Set rs = db.OpenRecordset(strSQL)
   
   If Not rs.EOF Then
       Me.txtData.Value = rs("Data").Value
       Me.txtTemaTreinamento.Value = rs("TemaTreinamento").Value
       Me.txtDuração.Value = rs("Duracao").Value
       Me.txtInstrutor.Value = rs("Instrutor").Value
       Me.txtProjeto.Value = rs("Projeto").Value
   Else
       'Caso o código não seja encontrado, limpa os campos do formulário
       Me.txtData.Value = ""
       Me.txtTemaTreinamento.Value = ""
       Me.txtDuração.Value = ""
       Me.txtInstrutor.Value = ""
       Me.txtProjeto.Value = ""
       MsgBox "O número do processo não foi encontrada na Base de Dados."
   End If
   
   rs.Close
   Set rs = Nothing
   Set db = Nothing
   
End Sub

Alexandre, Boa noite

segue BD para analise!

Alexandre Fim,


Gostaria de expressar minha sincera gratidão pela sua valiosa ajuda em resolver o problema com o código. Sua assistência foi fundamental para que eu pudesse encontrar a solução e avançar com o meu projeto.

Sua disposição em ajudar e compartilhar seus conhecimentos é verdadeiramente admirável.

Seu suporte fez toda a diferença, e sou muito grato por ter contado com sua expertise e assistência.


Obrigado!

Alexandre, Boa Tarde!


Estou enfrentando um problema em minhas aplicações no Access e gostaria de pedir a ajuda de vocês. Estou desenvolvendo um formulário chamado frmCad_Trabalhador e outro chamado frmHistorico, e em ambos os formulários, tenho uma caixa de listagem que deveria exibir a descrição do cargo, mas está exibindo o código do cargo em vez disso.

Gostaria de mencionar que nas respectivas tabelas do banco de dados, os dados estão sendo salvos corretamente, ou seja, tanto o código quanto a descrição do cargo estão corretamente registrados.

Já verifiquei a configuração da origem de dados da caixa de listagem e confirmei que está corretamente vinculada à tabela que contém as informações dos cargos. Também tenho certeza de que a coluna que contém a descrição do cargo está definida como a coluna que deveria ser exibida na caixa de listagem.

Além disso, verifiquei a propriedade "Bound Column" (Coluna Vinculada) da caixa de listagem e confirmei que está configurada corretamente para o número da coluna que contém o código do cargo. A propriedade "Column Widths" (Larguras das Colunas) também está configurada para exibir a descrição do cargo de forma adequada.

Considerando todas essas verificações, ainda estou enfrentando o problema de exibir o código do cargo em vez da descrição na caixa de listagem.

Gostaria de saber se alguém já enfrentou esse tipo de problema ou se tem alguma sugestão de como posso resolver essa questão. Seria muito útil receber orientações sobre outras possíveis configurações ou ajustes que possam ser necessários no meu formulário ou tabela.