[Resolvido]Como ocultar campos não preenchido no relatório ?

Prezados, bom dia.

Recorro aos mais experientes e vividos no ambiente Acess/VBA desse nosso fórum.

Estou com um pequeno problema. Tenho um formulário onde o utilizador/usuário final preenche campos com a data de pagamento e valor. As datas variam podem ser à vista, entr+30DD, entr*30DD+60DD indo até 310DD. Feito isso, ele imprime esse relatório para o cliente dele, aprovar ou não.

Minha duvida é s seguinte: como fazer para ocultar as demais formas de pagamento se o cliente fizer o pagamento à vista ? Pois são 10 txt´s.

Grato a todos.

Provavelmente seria interessante fazer alterações na estrutura do bd, criando uma tabela apenas para pagamentos. Assim sendo, os registros seriam gerados de acordo o número de pagamento. Sendo a vista, gera apenas um registro. Sendo em dois pagamentos, gera apenas dois registros, sendo só esses os registros a irem para o relatório.

Criquio, grato por responder. Mas, mexer na estrutura agora será um pouco complicado, pois estou na fase de entrega do projeto para o meu cliente ( segunda feira )!

Quando criei a tabela orçamento, inseri ali todas as formas de pagamento a qual o cliente me solicitou. Eu estou a brigar com o código .enabled, habilitando ou não as opções.

Eis um exemplo do código no evento ao carregar do relatório:

Me.FormaPagamento.SetFocus
If Me.FormaPagamento.Text = "À vista" Then

' a vista ou entrada
Rótulo81.Visible = True
DtPgto.Visible = True
Rótulo82.Visible = True
VPgto.Visible = True

' 30dd

Rótulo83.Visible = False
DtPgto1.Visible = False
Rótulo84.Visible = False
VPgto1.Visible = False
' 60dd
Rótulo87.Visible = False
DtPgto2.Visible = False
Rótulo88.Visible = False
VPgto2.Visible = False

Será que não há algo a ser feito ? Será que os campos não preenchidos, nas outras formas de pagamento irão sempre aparecer quando manda imprimir ?

Com permissão do criquio,
Mude esse código para o evendo ao formatar.
Para que ele funcione, terá que abrir o relatório
no modo "visualizar impressão" e não no modo relatório.

Bom dia Marcelo, mas onde esta esse evento: ao formatar ? Eu utilizo o AC2007, já fui em todas as propriedades e não a encontrei....

No aguardo.

Pode tambem fazer algo assim:

Código:

Dim C As Control

For Each C In Me.Controls
    If C.ControlType = acTextBox Then
        If IsNull(C) Or C.Value = "" Then
            C.Visible = False
        Else
            C.Visible = True
        End If
    End If
Next

Tente isso no evento "Ao carregar" ou clique na seção do relatório aonde estão os campos e escolha o evento que melhor atender.

Criquio, vou implementar essa rotina, e testar em todas as formas de pagamentos existentes aqui. Já lhe retorno com os resultados.

Grato Mestre.

Criquio, realmente funfa....é isso ai !

Muito obrigado pela tua ajuda.

Abraços.

Grato pelo retorno. O fórum agradece.