[Resolvido]Preencher um campo no Formulário

Bom dia a todos

Srs. eu tenho um campo no meu formulário que é data do cadastro que coloquei o nome de txt_data_ficha, o que eu desejo, eu tenho um campo chamado de txt_mes_ano, quando eu clicar no botão salvar, quero que a data colocada na data do cadastro seja convertida no campo mes_ano com o formato "mmmm/yyyy".
Se fosse uma consulta eu saberia fazer no qual seria:

Mes/Ano: Format$([Data_ficha];"mmmm/yyyy")

Mas como é Formulário não sei o código.

Obrigado...

tente assim:
Mes/Ano: Format([DtEntrada];"mm/yyyy")

Professor, Obrigado pelo seu retorno.

Acompanho todas as suas videos aulas e tenho aprendido muito com os seus post.
Vou tentar ser mais especifico ao clicar no botão salvar eu coloquei o seguinte código abaixo:

If IsNull(Mes_Ano) Then
Me.Txt_Data_Ficha.Format ("mm/yyyy")

Esse campo Mes_ano será preenchido automaticamente assim que clicar no botão salvar de acordo com o preenchimento da data da ficha.

Ex:

07/11/2015 - Txt_Dt_Ficha
11/2015 - Txt_Mes_ano

Fico no aguardo do retorno.

Txt_Mes_ano = Format([Txt_Dt_Ficha];"mm/yyyy")

boa tarde amigo Pedro

verifica se este exemplo que fiz, lhe atende
abraço Nogaro

este é o link

https://www.dropbox.com/s/vsshv8afz3fm42g/NogaroFormatM%C3%AAseAno.mdb?dl=0

Bom dia

Professor Nogaro.

Baixei seu BD é realmente o que necessito, porém quando coloco seu código dentro do meu banco de dados não dá certo, estou os códigos dentro do meu BD para melhor compreensão, veja se é possível me ajudar.

O que desejo é realmente quando clicar no botão salvar a data preenchida no campo data da ficha seja formatada para o campo mês ano como já especifiquei:

Ex: 08/11/2015 - data da ficha
11/2015 - Mês / Ano.

Outra coisa estou tentando postar esse BD e não estou conseguindo está dizendo que não tenho mais espaço para preencher, como se estivesse com a caixa cheia, sabe me dizer como resolver isso.

Mais uma vez Obrigado pela ajuda...

If IsNull(Nome_Completo) Then
MsgBox ("Preencha o campo Nome Completo")
Txt_Nome_Completo.SetFocus
Txt_Nome_Completo.BackColor = 7852
DoCmd.CancelEvent
End
End If

If IsNull(Nome_Completo) Then
MsgBox ("Preencha o campo Nome Completo")
Txt_Nome_Completo.SetFocus
Txt_Nome_Completo.BackColor = 7852
DoCmd.CancelEvent
End
End If

If IsNull(Data_Ficha) Then
MsgBox ("Preencha o campo Data da Ficha")
Txt_Data_Ficha.SetFocus
Txt_Data_Ficha.BackColor = 7852
DoCmd.CancelEvent
End
End If

If IsNull(Data_Nascimento) Then
MsgBox ("Preencha o campo Data Nascimento")
Txt_Data_Nascimento.SetFocus
Txt_Data_Nascimento.BackColor = 7852
DoCmd.CancelEvent
End
End If

If IsNull(Mes_Ano) Then
Me.Refresh

Me.Txt_Data_Ficha.Value = mêsano
End
End If

DoCmd.RunCommand acCmdSaveRecord

bom dia amigo Pedro não sou professor não, minha Área é Elétrica.
poste seu bd ou a parte que precisa aplicar este código
que vou colocar para você , abraço Nogaro !

pode enviar para meu e_mail: nogaro513@gmail.com

depois eu posto aqui ! abraço

Boa tarde amigo Nogaro

Com relação a postar um BD não estou conseguindo pois está dando uma mensagem de limite excedido, como se uma caixa de mensagem estivesse cheia, sabe me dizer como resolver isso?

Já com relação ao BD o que necessito é exatamente igual ao seu banco de dados porém quando estou colocando no meu sistema não está dando certo.

Obrigado

Sr Lupercio

Com relação ao seu código:

Txt_Mes_ano = Format([Txt_Dt_Ficha];"mm/yyyy")

Está dando erro no ( - Erro de Copilação - Era esperado: Separador de Lista ou)

Como resolver?

Obrigado

amigo Pedro

pode enviar para meu e_mail: nogaro513@gmail.com

depois eu posto aqui ! abraço

amigo Pedro !
comforme me pediu este é o Link

https://goo.gl/vwMvvL
aguardo retorno

abraço Nogaro !

Amigo Nogaro

Desculpe te incomodar mais o BD que você fez dá certo quando coloco o código dentro do meu BD não dá certo.

Te enviei por e-mail o BD original veja se consegue colocar esse código por favor...

Mais uma vez

Obrigado...

Pedro esta colocado no bd Original já enviei , e fucionando conforme pediu, abraços Nogaro

Prezado Nogaro

Veja nesse último BD que me enviou quando você cadastra um novo Ok ele calcula certo, agora quando você altera a data ele não recalcula.
Isso é importante no meu BD principalmente para cadastrados feitos no final do mês que acabam passando para o outro mês.

Obrigado

boa noite amigo Pedro.
corrigido, abraço Nogaro !
após atualizar da data Cadastro, coloque Me.Refresh vai ficar melhor ainda

https://goo.gl/t9dYRK

Obrigado problema resolvido...

olá amigo Pedro

fico feliz de ter resolvido

O Fórum agradece o retorno.

bons estudos

abraço Nogaro !

Obrigado pela ajuda