[Resolvido]Carregar em uma txtBox apenas o primeiro nome de um cadastro.

Acredito ser simples esta dúvida. Vamos lá...

Possuo uma tabela que cadastra o nome de clientes, exemplo: Tabela_Clientes

Campo NOME:
Leonardo Silva
Rafael Ferreira
Fernanda Rocha

Gostaria de quando eu seleciono o cliente para puxar os dados, que carregue em uma TextBox de um formulário apenas o primeiro nome de um dos cadastros, exemplo:

Nome: [Leonardo]
ou
Nome: [Rafael]
ou
Nome: [Fernanda]
o [](conchetes) significa uma textBox.

Alguma solução?

Att,

Leonardo.
Obs: MS Office 2003

Para isso no evento apos atualizar da caixa onde fica o nome completo

Private Sub SuaCaixaNomeCompleto_AfterUpdate()
Me.CaixaTextoQueReceberaNome = Left([SuaCaixaNomeCompleto], InStr([SuaCaixaNomeCompleto], " ") - 1)
End Sub

Harysohn,
É nesse caminho mesmo, eu estava tentando o mesmo processo =left([SuaCaixaNomeCompleto];find...
Só que o "FIND" é função do Excel, e o Access não aceita todas as funções iguais ao dele. Então queria encontrar uma que aceitava no Access. Como no seu exemplo o "InStr", porém nessa expressão que você mandou deu erro de sintáxe inválida!

"The expression you entered contains invalid syntax.
You omitted an operand or operator, you entered an invalid charater or comma, or you entered text without surronding it in quotation marks."

eu coloquei assim =Left([Tabela_Clientes.NOME], InStr([Tabela_Clientes.NOME], " ") - 1)
Manja onde está o erro de sintaxe??!
Att

Claro... esta expressão faz referencia a uma caixa texto no form.. e não a um campo na tabela....

O correto:

=Left([NOME], InStr([NOME], " ") - 1)

Onde Nome é o nome da sua caixa texto no form..

Uma dica.. Evite nome reservado do Access para nomes de campos ou caixa texto..

Por Exemplo: Nome, Valor, Data, Total etc.. Não utilize nomes para objetos dessa forma.. isto fatalmente produzirá erros..

http://dl.dropbox.com/u/26441349/Picoleo_24_08_11.rar

Cumprimentos

Consegui!

Referenciando o campo da tabela tambem funciona, amigo.

A sintaxe correta: =Left([Tabela_Clientes.NOME];InStr([Tabela_Clientes.NOME];" ")-1)

O problema era a pontuação.
De qualquer forma valeu pela atenção parceiro! Agradeço.

Tópico [Resolvido].

Ai embaixo onde envia o post tem um botão resovido.. tem que clicar nele para dar o tóopico como resolvido..

Saudações

A observação sua é pertinente pois a exmpressão em VB utiliza , (Virgula) ja em expressões diretamente em caixa texto tem-se que utilizar ; (Ponto e Vírgula)


Saudações

Isso, na realidade utilizei esta função direto no "Control Source" da Caixa. Por isso a confusão.
Obrigado.


Ainda sou "novato" aqui não conheço os esquemas para resolver o tópico, não encontrei...

Demorei, mas aprendo rápido.
Resolvido!

Ninguém me chamou na conversa, mas acabei de resolver um baita problema com esse post e quero agradecer ao colegas que postaram!

Abraços

Encaixou perfeitamente na minha dúvida!

À tempos estava procurando resolver isso! E a propósito o fórum é excelente.

Onde positivamos o cara que resolveu o post?

Walhew!!!