[Resolvido]Bloquear subformulario se no campo Data a mesma for anterior a data atual.

Bom dia.
Tenho um Formulário com dois subforms, um dentro do outro (aninhados).

Fml_Paciente.... Fml_Receita .....Fml_ItensDaReceita

Estou tentando desabilitar o 3º formulario se o Campo data for anterior à data atual, mas não estou conseguindo...
Coloquei o codigo seguinte no Evento Ao Entrar do SubForm 3:

Private Sub Fml_ItensDaReceita_Enter()
If DataReceita < Date Then
Me.Fml_ItensDaReceita.Enabled = False
End If
End Sub

Aparece a mensagem: "Erro em tempo de Execução: '2164' - Você não poderá desabilitar um controle quando ele estiver em foco."

No sub formulario só tem dois eventos possiveis? (Ao Entrar e ao Sair)?
Tentei colocar o mesmo código no Evento ao Entrar do 2º Form e no Evento Ao Abrir do 1º Form. Nesses últimos deu a seguinte mensagem de erro: "Erro de Compilação. Método ou membro de dados não encontrado" Destacando Fml_ItensDaReceita.
Parece que o VBA por algum motivo obscuro não está encontrando o Fml_ItensDa Receita.
Alguem pode me ajudar?

Walter,
tive esse problema faz poucos dias atrás...

crie um controle no formulário e ajuste o seu tamanho e cor para que fique invisível (sem alterar a propriedade visible) e mova o foco para ele conforme abaixo:

Private Sub Fml_ItensDaReceita_Enter()
If DataReceita < Date Then
Me.NomedoNovoControle.setfocus
Me.Fml_ItensDaReceita.Enabled = False
End If
End Sub

abraços

Olá, Leandro. Boa tarde.
Obrigado, por responder. É bom saber que você teve o mesmo problema e conseguiu resolve-lo. Assim pode me ajudar...
Qual "controle" devo criar: um botão? uma caixa de texto? e onde devo coloca-la, no formulario 1, no 2 ou no 3?
Grato,
Walter

Sorry Walter,

pode ser qualquer controle que possa receber foco... eu criei uma caixa de texto e você pode colocá-la em qualquer formulário desde que não seja naquele que você quer desabilitar. Põe no principal, assim, posteriormente se fizer uma cópia dos outros formulários este controle não vai junto pra "sujar" a cópia.

um abraço

Leandro

Beleza, Leandro.
Funcionou do jeito que eu queria.

Muito obrigado e até a próxima.

Walter