none
como preencher as textbox com os dados ao digitar o codigo na textbox do codigo do dado no formulario? RRS feed

  • Discussão Geral

  • Bom dia!

    como preencher as textbox com os dados ao digitar o codigo do registro na textbox do codigo do registro no formulario usando o vb.net e linq to sql?

    ou seja: eu tenho um formulario com duas TextBox, TextBoxCodigo, e textboxNome

    quero que ao digitar o codigo na primeira textbox o sistema faz a consulta e se existir exibe o nome na segunda textbox.

    usando o Linq to sql e vb.net 

    Tabela: Cadastro de Actividades

    Campos: CodigoActividade Int , NomeActividade varchar (70)

    na aplicação Fiz o Mapeamento das tabelas usando o (Datacontext)

    Obrigado e bom dia!


    Daniel Rosa Iniciante de programação em vb.net, linq sql e Sql server

    terça-feira, 7 de janeiro de 2014 05:56

Todas as Respostas

  • Bom dia!

    como preencher as textbox com os dados ao digitar o codigo do registro na textbox do codigo do registro no formulario usando o vb.net e linq to sql?

    ou seja: eu tenho um formulario com duas TextBox, TextBoxCodigo, e textboxNome

    quero que ao digitar o codigo na primeira textbox e o usuario precionar a tecla ENTER, o sistema faz a consulta e se existir exibe o nome na segunda textbox ou preenche as textbox com os dados da pesquisa.

    usando o Linq to sql e vb.net

    Tabela: Cadastro de Actividades

    Campos: CodigoActividade Int , NomeActividade varchar (70)

    na aplicação Fiz o Mapeamento das tabelas usando o (Datacontext)

    a pesquisa deve ser feita ao premirmos a tecla ENTER na textboxcodigo.

    Obrigado e bom dia!


    Daniel Rosa Iniciante de programação em vb.net, linq sql e Sql server

    terça-feira, 7 de janeiro de 2014 06:07
  • esta é a função que faz a pesquisa no banco de dados
    
       Public Function LocalizarActividadeCodigo(ByVal CodigoActividade As Integer) As DAL.ActividadeEmpresa
                'função para localizar uma actividade pelo codigo ou pelo nome
                Using ctxt As New DAL.DANIROSADataContext
                    Dim actividades = (From actividad In ctxt.ActividadeEmpresas
                                 Where actividad.Codigo = CodigoActividade
                                 Select actividad).FirstOrDefault
                    Return actividades
                End Using
    
    aqui o codigo no formulario, para buscar a actividade pelo seu codigo
    
     Private Sub TxtCodigoActividade_KeyUp(sender As Object, e As KeyEventArgs) Handles TxtCodigoActividade.KeyUp
            'aqui este codigo pesquisa o artigo pelo codigo
            If e.KeyCode = Keys.Enter Then
                If TxtCodigoActividade.Text.Length > 0 Then
    
                    Dim a As DAL.ActividadeEmpresa = (New BLL.DANIROSA.ActividadeBLL).LocalizarActividadeCodigo(TxtCodigoActividade.Text.Trim)
                    If a IsNot Nothing Then
                        TxtDescriçãoActividade.Text = a.Nome.ToString
                   
                    End If
                End If
            End If
            End Sub

    mas não esta a funcionar, sera que estou a usar o evento errado? eu coloquei o codigo da chamada n evento KeyUp da textboxCodigo.

    Eu quero que depois de digitar o codigo  do registo e clicar na tecla ENTER ele faz a busca e preenche a outra textbox com o nome da actividade.

    Obrigado quem poder dar um palpite.


    Daniel Rosa Iniciante de programação em vb.net, linq sql e Sql server

    terça-feira, 7 de janeiro de 2014 21:07