[Resolvido]Combobox não mostra valor

Olá Pessoal, Bom Dia.

Estou com um probleminha que não estou conseguindo contornar.

Tenho um um formulário com dois subforms, o problema está numa combobox no segundo subform, que não mostra o valor, até que seja clicada.

Esta combobox (lista_de_empresas) tem um evento em "Ao receber o foco", para filtrar/reduzir a lista apenas ao nome da empresa selecionada no primeiro subform. Eis o código:

Private Sub lista_de_empresas_GotFocus()
Dim strsql As String
strsql = "SELECT T_EMPRESA.EMP_ID, T_EMPRESA.EMP_Nome FROM T_EMPRESA "
strsql = strsql & "WHERE (((T_EMPRESA.EMP_ID)=Formulários![TTLicitacao - Consulta]!"
strsql = strsql & "[TTT_CT_ADMN Subformulário].Form!lista_empresas.value)) ORDER BY T_EMPRESA.EMP_Nome;"
Me!lista_de_empresas.RowSource = strsql
End Sub

A origem da linha da combobox tem a mesma query sql.

Segue um screenshot


Antecipo os agradecimentos de qualquer ajuda.

Att,

GraNiZus

E como é o funcionamento dessa combo em relação à tabela? Ela deve mostrar um dado gravado em um campo da tabela ou é desvinculada? Se precisar que seja vinculada, tem que ver se a linha "Fonte do controle", na aba Dados das propriedades dela, está mostrando o vínculo com o campo e, caso não esteja, vinculá-lo.

Mostra corretamente o nome do campo da tabela.

Quando eu clico sobre esta combobox, ela exibe o valor, na tabela também consta os dados corretamente, só não é exibido naturalmente, que, só exibe após o clique sobre o controle.

Segue o DB. Experimente mudar (em cima) nos controles, verá que quando tem nota cadastrada, todos os dados são exibidos, com excessão do nome da empresa, que só exibida no primeiro registro.

Olá pessoal.

Consegui resolver da seguinte forma.

No form principal, no evento NO ATUAL, lancei um requery no objeto que não estava se atualizando com este código:

Forms![TTLicitacao - Consulta]![TTT_NotaFiscal Subformulário].Form![lista_de_empresas].Requery

O chato foi que tive que lançar este evento em cada um dos campos/controles do primeiro subform, no evento AO RECEBER O FOCO, uma cópia da linha acima.

Tosco na verdade, mas os fins justificam os meios