[Resolvido]SELECT para selecionar dados

Bom dia amigos do fórum.

Estou com um probleminha com uma instrução usando select. È assim tenho um formulário com uma caixa de texto (Não acoplado) onde pretendo digitar o ID do responsável por um aluno e outra caixa de texto que quero que apareça o nome do responsável ao digitar o seu Id.

Estou usando esta instrução:

=[sql]="SELECT Nome FROM Responsaveis WHERE IdResponsavel =" & [IdPai].[Texto]

Mas não esta dando certo. Podem me ajudar?

Olá obedebatista;

Talvez pudesse tentar:

Me.SuaOutraCaixaDeTexto.ControlSource =“SELECT Nome FROM Responsaveis WHERE IdResponsavel = me.IdPai.Value”

Espero que isso possa ajudar.

Abraços.

Boa tarde,

Caixas de textos não possuem a propriedade RowSource. Essa propriedade está presente em caixas de listagem e caixas de combinação, dentre outras.

Se você quer apenas mostrar o nome do responsável, sugiro utilizar a função DLookup(). Ficaria da seguinte maneira:

No evento após atualizar da caixa de texto que digita o código do responsável, coloque:

Código:

If Not IsNull(IdPai) = true then
    txtResponsavel = DLookup("Nome", "Responsaveis ", "IdResponsavel =" & IdPai & "")
End if

Sendo txtResponsavel o campo que receberá o nome do responsável.

Abraço.

Olá CassioFabre;

Você tem toda razão!!!

O objeto Caixa de Texto não tem a propriedade RowSource; mas sim a propriedade ControlSource, conforme sugeri.

Na ajuda do Access pode ser encontrado:

Exemplo

O exemplo a seguir define a propriedade OrigemDoControle para uma caixa de texto denominada AddressPart como um campo denominado City:

Visual Basic for Applications
Forms!Customers!AddressPart.ControlSource = "City"

O próximo exemplo define a propriedade OrigemDoControle de uma caixa de texto denominada Expected como a expressão =Date() + 7

Visual Basic for Applications
Me!Expected.ControlSource = "=Date() + 7"



Grifos nossos.

Abraços!

Boa tarde amigos, vou tentar as duas ai depois dou retorno ok.

Boa tarde Lucio

Jurava que tinha lido RecordSource. Falha minha.

Abraço.

Boa tarde CassioFabre;

Não há falha qualquer! Quantas e quantas vezes nos enganamos com tantas propriedades, atributos e coisas que o valham...

Entendo que este ambiente é rico em razão de trocas de idéias, pontos de vista, abordagens em resolver problemas e propor soluções.

Aprendo muito a cada visita ao forum!

Sendo assim; continuemos no esforço de auxiliar os colegas e, concomitantemente, evoluir!

Abraços!

Olá Lúcio

Tentei a sua dica, mas, da um erro dizendo que não existe campos lista de campos

Boa tarde obedebatista;

Qual o contexto? Onde você colocou a instrução? Foi no evento "exit" da caixa de texto na qual você informa o Id?

Há algum botão de controle?

Se possível envie a instrução que você colocou no objeto.

Aguardo mais detalhes.

Enviei um print para ajuda.

No campo IdPai quero que ao digitar apareça o nome do Pai do aluno  no campo Pai que esta na tabela Responsaveis espero que fique mais claro agora.

Quais são os campos da tabela?

Há o campo Nome e IdPai, somente?

Tente a instrução abaixo no evento "exit" ou "AfterUpdate" da Caixa de Texto IdPai do seu form. Dê um enter após a digitação na IdPai.

Me.PAI.ControlSource =“SELECT Nome FROM Responsaveis WHERE IdResponsavel = me.IdPai.Value”

Vamos ver se funciona...

vou tentar aqui

Ainda continua dando erro

Aparece Erro de compilação Era esperado um fim da instrução

To postando aqui o Sistema para ajudar a entender melhor.

Download

Explicando melhor do que se trata é um sistema de Gerenciamento Acadêmico para uma escola ainda falta bastante por enquanto estou trabalhando no formulário Aluno.

Vamos tentar com

Me.PAI.ControlSource =“SELECT Nome FROM Responsaveis WHERE ((IdResponsavel) = me.IdPai.Value)”



Estou correto ao pressumir que:

"PAI" é a Caixa de Texto desacoplada no form, na qual será buscado o nome do pai do aluno

"Nome" é o campo da tabela "Responsaveis", no qual consta o nome do pai

"IdResponsavel" é Chave Primária da tabela "Responsaveis"

"IdPai" é a Caixa de Texto desacoplada no form, na qual será digitado um número que corresponderá ao IdResponsavel

Não há outros campos na tabela. É isso?

há outros campos sim, mas o que pretendo que apareça nesse determinado momento é somente o nome do pai

só lembrando que onde digito o IdPai deve ficar armazenado na tabela aluno para vincular os dois

Prezado obedebatista

Baixei o arquivo e estou analisando

Prezado obedebatista

Estive analisando o SGA...
Na Tabela Responsaveis o campo IdResponsavel é um campo chave primária.

Na tabela aluno o campo IdResponsavel não está vinculado ao campo IdResponsavel da tabela Responsavel; é apenas uma caixa de texto que não busca o IdResponsavel da tabela Responsavel, apesar do nome do campo ser IdResponsavel.

Sugiro que reveja a estrutura da tabela Alunos fazendo (criando através do assistente de pesquisa) com que o campo IdResponsavel busque o IdResponsavel na tabela Responsaveis.

Para atender a sua solicitação utilizei a função Dlookup; pois da maneira com está estruturada a tabela Alunos e a tabela Responsavel não daria para utilizar a propriedade ControlSource, conforme havia sugerido.

Todavia, o que você solicitou está rodando: Formulário Alunos na aba OUTRAS INFORMAÇÕES ao digitar o IDPai o nome do responsável é preenchi na Caixa de Texto txtPai, conforme abaixo

Private Sub IdPai_Exit(Cancel As Integer)
Me.txtPai.Value = DLookup("[Nome]", "Responsaveis", "[IdResponsavel] =" & Me.IdPai.Value)
End Sub


Veja o anexo “SGA modificado. Accdb”
Na expectativa de ter contribuído, desejo sucesso no desenvolvimento do SGA.

Muito obrigado meu amigo

Era isso mesmo que queria.

Um Forte abraço

Prezado obedebatista;

Agradeço o retorno.

Abraços.