LOCALIZAR CLIENTE PELO NOME
Estou tendo dificuldade em localizar cliente pelo nome, por tel / cel / uf consigo só o nome do abençoado que não ajudem ai grato
[ô]LOCALIZA DADOS DO CLIENTE PELO NOME
Dim clilist = From cad_cli In GodMecDataSet.CAD_CLI _
Where (UCase(cad_cli.NOME) = UCase(TextBox27.Text.Trim)) _
Select cad_cli.NOME, cad_cli.CELULAR, cad_cli.ENDERECO, cad_cli.SOBRENOME, _
cad_cli.BAIRRO, cad_cli.CIDADE, cad_cli.Nº, cad_cli.UF, cad_cli.TELEFONE
[ô]MOSTRA MENSAGEM DIZENDO QUE NÃO FOI DIGITADO TELEFONE NO CAMPO
If TextBox27.Text = [Ô][Ô] Then
End If
[ô] InputBox([Ô]clilist[Ô])
For Each cli In clilist
TextBox42.Text = cli.NOME
TextBox43.Text = cli.SOBRENOME
TextBox44.Text = cli.ENDERECO
TextBox47.Text = cli.Nº
TextBox45.Text = cli.BAIRRO
TextBox50.Text = cli.CIDADE
TextBox48.Text = cli.UF
MaskedTextBox7.Text = cli.TELEFONE
MaskedTextBox8.Text = cli.CELULAR
Next
TextBox27.Text = [Ô][Ô]
[ô]LOCALIZA DADOS DO CLIENTE PELO NOME
Dim clilist = From cad_cli In GodMecDataSet.CAD_CLI _
Where (UCase(cad_cli.NOME) = UCase(TextBox27.Text.Trim)) _
Select cad_cli.NOME, cad_cli.CELULAR, cad_cli.ENDERECO, cad_cli.SOBRENOME, _
cad_cli.BAIRRO, cad_cli.CIDADE, cad_cli.Nº, cad_cli.UF, cad_cli.TELEFONE
[ô]MOSTRA MENSAGEM DIZENDO QUE NÃO FOI DIGITADO TELEFONE NO CAMPO
If TextBox27.Text = [Ô][Ô] Then
End If
[ô] InputBox([Ô]clilist[Ô])
For Each cli In clilist
TextBox42.Text = cli.NOME
TextBox43.Text = cli.SOBRENOME
TextBox44.Text = cli.ENDERECO
TextBox47.Text = cli.Nº
TextBox45.Text = cli.BAIRRO
TextBox50.Text = cli.CIDADE
TextBox48.Text = cli.UF
MaskedTextBox7.Text = cli.TELEFONE
MaskedTextBox8.Text = cli.CELULAR
Next
TextBox27.Text = [Ô][Ô]
boa tarde,
vc quer fazer a pesquisa com todos esses critérios? ou vc quer usar só o nome como critério?
Até mais.
vc quer fazer a pesquisa com todos esses critérios? ou vc quer usar só o nome como critério?
Até mais.
Boa tarde..
Sim quero que ao digitar o nome do cliente seja retornado tela os campos
TextBox42.Text = cli.NOME
TextBox43.Text = cli.SOBRENOME
TextBox44.Text = cli.ENDERECO
TextBox47.Text = cli.Nº
TextBox45.Text = cli.BAIRRO
TextBox50.Text = cli.CIDADE
TextBox48.Text = cli.UF
MaskedTextBox7.Text = cli.TELEFONE
MaskedTextBox8.Text = cli.CELULAR
Agradeço a gentileza sou novo no vb apenas duas semanas^^
Sim quero que ao digitar o nome do cliente seja retornado tela os campos
TextBox42.Text = cli.NOME
TextBox43.Text = cli.SOBRENOME
TextBox44.Text = cli.ENDERECO
TextBox47.Text = cli.Nº
TextBox45.Text = cli.BAIRRO
TextBox50.Text = cli.CIDADE
TextBox48.Text = cli.UF
MaskedTextBox7.Text = cli.TELEFONE
MaskedTextBox8.Text = cli.CELULAR
Agradeço a gentileza sou novo no vb apenas duas semanas^^
Ok, sei como é, já passei por isso.
Amigo veja esse tópico, tem uma dúvida parecida com a sua, na verdade nesse seu caso era bom utilizar um filtro como no tópico que vou lhe passar.
http://vbmania.com.br/pages/download.php?varKey=75ce53a322dabaa82d0b9aba386d6750&varTipo=1
Até mais.....
Amigo veja esse tópico, tem uma dúvida parecida com a sua, na verdade nesse seu caso era bom utilizar um filtro como no tópico que vou lhe passar.
http://vbmania.com.br/pages/download.php?varKey=75ce53a322dabaa82d0b9aba386d6750&varTipo=1
Até mais.....
Agradeço muuito a sua ajuda vou continuar na luta^^ afinal niguém ficou famoso por desistir rsrs. Forte abraço fica com Jesus!
Ok, qualquer dúvida aÃ, é só postar que estamos aÃ...
Abraços.
Abraços.
Acho que descobri o que esta acontecendo de errado, é que só me retorna se eu digitar exatamente a quantidade de caracteres que tem o nome tipo Marcos = 5 se for Francisco e estiver declarado com 5 n retorna nada.
como faço para retornar o nome do cliente idependente do valor que coloquei tipo nchar (50) não existe primeiro nome com mais de 50 mas o infeliz so me retorna se eu estipular no nvchar a quantidade correta de caracteres da pesquisa caso contrario nem vem nada. Brigado dinovo
Private Sub Button20_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button20.Click
[ô]LOCALIZA DADOS DO CLIENTE PELO NOME
Dim clilist = From cad_cli In GodMecDataSet.CAD_CLI _
Where (UCase(cad_cli.NOME) = UCase(TextBox27.Text.Trim)) _
Select cad_cli.TELEFONE, cad_cli.CELULAR, cad_cli.NOME, cad_cli.ENDERECO, cad_cli.SOBRENOME, cad_cli.BAIRRO, cad_cli.CIDADE, cad_cli.Nº, cad_cli.UF
[ô]MOSTRA MENSAGEM DIZENDO QUE NÃO FOI DIGITADO TELEFONE NO CAMPO
If TextBox27.Text = [Ô][Ô] Then
MsgBox([Ô]Digite o Nome do Cliente[Ô])
End If
[ô] InputBox([Ô]clilist[Ô])
For Each cli In clilist
TextBox42.Text = cli.NOME
TextBox43.Text = cli.SOBRENOME
TextBox44.Text = cli.ENDERECO
TextBox47.Text = cli.Nº
TextBox45.Text = cli.BAIRRO
TextBox50.Text = cli.CIDADE
TextBox48.Text = cli.UF
MaskedTextBox7.Text = cli.TELEFONE
MaskedTextBox8.Text = cli.CELULAR
Next
TextBox27.Text = [Ô][Ô]
End Sub
End Class
como faço para retornar o nome do cliente idependente do valor que coloquei tipo nchar (50) não existe primeiro nome com mais de 50 mas o infeliz so me retorna se eu estipular no nvchar a quantidade correta de caracteres da pesquisa caso contrario nem vem nada. Brigado dinovo
Private Sub Button20_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button20.Click
[ô]LOCALIZA DADOS DO CLIENTE PELO NOME
Dim clilist = From cad_cli In GodMecDataSet.CAD_CLI _
Where (UCase(cad_cli.NOME) = UCase(TextBox27.Text.Trim)) _
Select cad_cli.TELEFONE, cad_cli.CELULAR, cad_cli.NOME, cad_cli.ENDERECO, cad_cli.SOBRENOME, cad_cli.BAIRRO, cad_cli.CIDADE, cad_cli.Nº, cad_cli.UF
[ô]MOSTRA MENSAGEM DIZENDO QUE NÃO FOI DIGITADO TELEFONE NO CAMPO
If TextBox27.Text = [Ô][Ô] Then
MsgBox([Ô]Digite o Nome do Cliente[Ô])
End If
[ô] InputBox([Ô]clilist[Ô])
For Each cli In clilist
TextBox42.Text = cli.NOME
TextBox43.Text = cli.SOBRENOME
TextBox44.Text = cli.ENDERECO
TextBox47.Text = cli.Nº
TextBox45.Text = cli.BAIRRO
TextBox50.Text = cli.CIDADE
TextBox48.Text = cli.UF
MaskedTextBox7.Text = cli.TELEFONE
MaskedTextBox8.Text = cli.CELULAR
Next
TextBox27.Text = [Ô][Ô]
End Sub
End Class
Boa noite,
Não entendi direito, você quer digitar tipo [Ô]Franc[Ô] e ele lhe trazer o nome Francisco?
Até mais.
Não entendi direito, você quer digitar tipo [Ô]Franc[Ô] e ele lhe trazer o nome Francisco?
Até mais.
Isso mesmo eu gostaria que ao digitar ou fosse completando automaticamente ou tipo quero Francisco e digito franc ele me retornaria
os que tivessem nome francisco grato pela atenção.
os que tivessem nome francisco grato pela atenção.
Ah entendi, olha nesse caso teria que ser uma combobox, abaixo segue um tutorial do Macoratti de como fazer.
Combobox AutoCompletar
Até mais.
Combobox AutoCompletar
Até mais.
Outro caso seria criar um grid onde fosse digitando em um campo e mostrando os itens filtrados, igual no primeiro exemplo que lhe passei.
Tópico encerrado , respostas não são mais permitidas