TEXTBOX

AYRES 18/12/2006 14:36:10
#190645
Boa Tarde!

Galera, tenho um exemplo que quando digito no textbox faz um filtro dos itens registrado da tabela e mostra em um datagrid.

Por acaso alguem sabe como faço para se autocompletar no textbox mesmo?
pois do jeito que ta'ele mostra no datagrid. Queria usar apenas um componente.

ao autocompletar e dar um Enter será mostrado em outro textbox informacao de uma coluna(campo), referente ao item selecionado.

Ha gostaria de aproveitar agradecer o nosso amigo CHAAPOLINN pela ajuda!

caso alguem possa me auxiliar no meu exemplo agradeço!
Valeu!
AYRES 21/12/2006 10:54:11
#191424
senhores modifiquei o exemplo a combo ja esta vinculado com textbox, agora so falta deixa autocompletar no combobox mesmo
alguem sabe?
vi uns exemplos aqui e nao entendi


Private conn As OleDbConnection
Private dAdapter As OleDbDataAdapter
Private dvm As DataViewManager
Private dset As DataSet

 Function criaStringConexao() As String
        Dim stringConexao As String
        stringConexao = "Data Source =C:\Analyzer\BD\profile.mdb;Provider=Microsoft.Jet.OLEDB.4.0;"
        Return stringConexao
    End Function


    Private Sub preencheCombo()
        Try
            'abre a conexão com o banco de dados
            conn = New OleDbConnection(criaStringConexao)
            conn.Open()
        Catch ex As OleDbException
            ' MessageBox.Show(("Erro na conexão ..." + ex.Message))'pegua o erro
            MessageBox.Show(("Erro na conexão ..." & vbCrLf & "Favor solicitar Suporte a Informática!"))


        End Try

        Dim sqlStr As String = "SELECT * FROM v3"

        'Instancia um DataAdapter passandoo a instrucao SQL e a conexão
        dAdapter = New OleDbDataAdapter(sqlStr, conn)

        'Instancia o dataset
        dset = New DataSet()

        'Obtem a Coleção que fornece o mapeamento mestre
        ' entre a tabela fonte e o datatable
        dAdapter.TableMappings.Add("Table", "v3")

        'Usa um data adapter para preencher o dataset ou datable com
        ' os dados retornados da instrução
        dAdapter.Fill(dset)
        'Quando vinculamos um DataSet, a plataforma .NET automaticamente usa o
        'DataViewManager correspondente fornecido atraves da propriedade DataSet.DefaultViewManager
        Me.dvm = dset.DefaultViewManager

        Me.ComboMeas.DataSource = Me.dvm
        'exibe a "tabelaClientes.CompanyName no ComboBox
        Me.ComboMeas.DisplayMember = "v3.MeasCode"
        Me.ComboMeas.ValueMember = "v3.MeasCode"

        'Efetua a vinculação com os controles TextBox
        Me.txtfalha.DataBindings.Add("Text", Me.dvm, "v3.defeito")
        Me.txtprocesso.DataBindings.Add("Text", Me.dvm, "v3.etapa")
        Me.txtdesfalha.DataBindings.Add("Text", Me.dvm, "v3.Description")
        Me.txtLow.DataBindings.Add("Text", Me.dvm, "v3.SpecLow")
        Me.txtResult.DataBindings.Add("Text", Me.dvm, "v3.MeasResult")
        Me.txtHigh.DataBindings.Add("Text", Me.dvm, "v3.SpecHigh")

        ' fecha a conexão com o banco de dados
        Me.conn.Close()
    End Sub
Tópico encerrado , respostas não são mais permitidas
Voltar