[Resolvido]Marcacao de campo sim/nao ativando ou desativando texto em form

tenho um sob_form continuo e nele ficam inserido as parcelas (O exemplo parcelas 2008 do JP)

eu implementei nele uma ltsbox que vai o controle do registro ativo.. com o nome do cliente...

coloquei um codigo na lstBox para que se o cliente tiver todas as parcelas pagas
Campo sim/Nao = -1
ele mostre um texto no form, caso nao tenha.. o texto fica visible = False..

Eis o codigo

If Forma_Pgto_Cons.Form!Quitada.Value = "-1" Then
Me.TxtQuitado.Visible = True
Else
Me.TxtQuitado.Visible = False

End If


O que ocorre é que se o cliente tem apenas uma parcela paga = -1

ele ativa o texto mesmo assim. e gostaria que so ativasse o texto se todas as linhas tivessem valor -1 no campo sim/nao


Se puderem ajudar.. agradeco

Puts.. vou levar um puxão de orelha.. mas alguem viu este tópico?

perdoem-me a insitência..

Eu vi, mas com 3 à minha volta ainda não me debruçei sobre isto. Agora vou para uma reunião e quando voltar....

ow Vierão.. Obrigado e perdoe-me pela impaciencia...
e que estou realmente necessitado disto.. apenas me falta isto para implementar non sistema que vendi... a pedido do cliente

Vortei amigo. Vou ler o tópico melhor, pois não estou a entender bem o que quer.

Talvez o evento "Ao pintar" do detalhe do formulário resolva isso.

Sim, com a formatação condicional. Pepanp!

assim vierao...é um sub form continuo.. e nele por exemplo se houver 5 registros

(Campo quitada - opção sim/nao)

reg 1 = 0
reg 2 = -1
reg 3 = -1
reg 4 = 0
reg 5 = 0

No codigo

If Quitada.value = -1
Mt.txtAviso.Value enabled = Visivel

Se todas as 5 opcoes estiverem marcadas -1 o TxtAviso fica visivel

Se tiver ai menos uma opçção com valor = 0 o TxtAviso fica oculto

o que ocorre..
se no form tiver apenas uma opçao com valor -1 o texto fica visivel..
e so deveria ficar visivel se todas as 5 opcoes tivessem valor -1


Espero que tenham entendido

Esse codigo diz respeito a um form de consulta que ao abrir se todas as opcoes estiverem com valor -1 aparecera a mensagem:

Debitos quitados para esse cliente...

mas se tiver algum campo desmarcado nao aparece a mensagem

Grato

me deem uma luz de como conseguir fazer isso amigao..
grato

É um form contínuo ou subformulário?

Está me parecendo mais um subform dentro de um form que equivale a um registro de cliente.

Estou certo?

Sub formulario continuo

o codigo para o que pretendo:

If Forma_Pgto_Cons.Form!Quitada.Value = "-1" Then
Me.TxtQuitado.Visible = True
Else
Me.TxtQuitado.Visible = False

End If

so que se um registro tiver marcado ele mostra o texto..
e so teria que mostrar se todos os registros estivessem -1

é o exemplo parcelas 2008 do joao paulo

subform dentro de um form de clientes

Oi Harysohn.

Encontrei o bd Parcelas 2008 e apliquei um dlookup e ocorreu como deseja, veja:

http://dl.dropbox.com/u/8080696/FMA/Parcelas_2008_p_Harysohn.rar

Apliquei o código no evento Ao Abrir e no Atual do formulário.

Quite as parcelas dos clientes e observe.

Boa noite caro Dilson..
Quitei..
Observei...
e.. nada..rss

nao apareceu nada?
me mandou o correto?

entendi amigao....

esta no ao abrir...
desculpa ai. rsrsrs


vou ver o codigo e aplica-lo ao meu e te dou um retorno...
Grato amigao..

Dilsao.. poderia me dar uma breve explicacao do DLokup?
assim em termos gerais..
Grato

Amigão coloquei mas deu erro na linha lblQuitda...

Editei este texto. rsrs percebi o meu erro..

Resolveu o problema?

O dilsao..
perdoa ai.. fiz uma confusao danada aqui no copia e colar
kkkkkkkkkkkkk

aiaiai

Resolvido Dilson...
Agora um favor...
poderia me dar uma breve explicacao do uso do Dlokup neste exemplo?
assim em termos gerais?

OK,

O funcionamento é o seguinte, observe o que está de verde:

If DLookup("Num_OR", "tbl_Parcelas", "Num_OR =" & Forms![cadastro de serviços]!Num_OR & " And Quitada =0") Then

lblQuitada.Visible = False

Else

lblQuitada.Visible = True

End If

Daí vou dizendo:

Se o campo Num_OR que está na tabela tbl_Parcelas for igual ao campo Forms![cadastro de serviços]!Num_OR que está no formulário cadastro de serviços e dentro desse conjunto de registros o campo Quitada estiver igual a zero então:

lblQuitada.Visible = False

Deixo o rótulo lblQuitada invisivel, visto que existe dentro do conjunto parcelas não quitadas.

Ou se estiver todo o conjunto diferente de zero, no caso -1 então:

lblQuitada.Visible = True

Faço aparecer o rótulo, pois o cliente não deve nada.

Para saber mais de dlookup, aqui no fórum tem um tópico ótimo para entender o uso, veja:
dlookup - Função DLookup explicação

Falou!

entao a grosso modo a funcao dlockup faz referencias a um conjunto de registros..

basicamente é isso?

Como Allen Brown escreveu:
---------------------------------------------------------------------------------------
Obtendo um valor de uma tabela
Cedo ou tarde você vai precisar para recuperar um valor armazenado em uma tabela
---------------------------------------------------------------------------------------
É usado para obter, capturar valor ou valores em tabela, quando cita-se a palavra valor, significa que é feito o uso de indicadores, ou seja, nome de dados como critério.

entendi.. Irei estudar mais sobre isso..
Obrigado e boa noite amigo..