[Resolvido]Campo visivel

Boa tarde a todos:
Tenho um campo chamado Validade (sim/não) e outro chamado data. Como faço para o campo data ficar invisivel e só aparecer quando a opção validade for marcada? Importante que a cada novo registro o campo data permaneça invisivel e só apareça quando a opção validade estiver marcada.
Um forte abraço a todos.

Bom dia Juan.

Bom, vou tentar te ajudar sem ver o seu código então talve você tenha que adaptar uma ou duas coisas.

1° No seu formulario aonde estão os campos, vai na propriedade do campo data, aba Formato, campo "Visivel", coloque "Não".

2° Abra as propriedades do seu formulario, vá na aba eventos e no campo "No Atual" (Evento vai acontecer toda vez que mudar de registro), clique nos três pontos e selecione "Constutor de Codigos" e cole o seguinte codigo dentro do corpo do evento.

if (Me.Validade = True) then
Me.Data.Visible = True
Me.Requery
End if

3° Adapte os nome dos codigos para seus campos.

4° Se quiser marcar o campo Validade e atualizar no mesmo instante precisa colar o mesmo codigo no evento "Apos Atualizar" no campo Validade.

Boa tarde Roger.
Muito obrigado pelo apoio.
Gostaria que o campo data só aparecesse quando o campo validade estivesse marcado. O problema está no registro seguinte, porque o campo data fica visivel permanentemente. Vou tentar explicar melhor:
1- No registro 10 o material tem validade, logo preciso marcar o campo de validade (sim/não) para inserir a data.
2- No registro 11 o material não tem validade, logo o campo data não precisa aparecer, porém uma vez marcado o campo validade o campo data permanece visivel.

A certo , não é diferente do que expliquei.

No campo "Validade" no seu formulario, crie um evento "Apos Atualizar"
E cole o seguinte codigo. Esse vai se responsavel por revelar o campo se Validade for marcada.

Private Sub Validade_AfterUpdate()
Me.Data.Visible = False
If (Me.Validade = True) Then
Me.Data.Visible = True
End If
End Sub

Na propriedade do Formulario, crie um evento em "No Atual" e cole o mesmo codigo que vai ser responsavel por checar se o Validade esta marcado e se vai mostrar ou não enquanto estiver navegando pelos registros.

Private Sub Form_Current()
Me.Data.Visible = False
If (Me.Validade = True) Then
Me.Data.Visible = True
End If
End Sub

Observação: o nome Data no campo poderá ter problemas futuros, sugiro alterá-la para um nome que não seja padrão do access. ex: Data_Val, segue abaixo:

Evento No Atual do Form:
If me.Validade.value=-1 'Se o campo for sim
me.Data_Val.Visible=True 'Campo data de validade ficará visível
Else ' Senão
Me.Data_Val.Visible=False ' Ficará invisível
End If

Coloque o mesmo código no Evento após atualizar do campo Validade (Sim/Não);

Ver se atende...

Abraços

Meus amigos, muito obrigado rodou perfeitamente.
AP Jesus muito obrigado pela dica do campo data, já alterei... o que vale é a voz da experiência rsrsrs..
Obrigado pela ajuda

Valeu amigão! Aprendemos e agradecemos ao fórum...