USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Visual Basic.Net    (Problemas Comuns)

Título da Dica:  Preenchimento automatico da combo a medida que se digite (Semelhante ao explorer)
Postada em 27/2/2004 por Rochª            
Quando voce digita uma letra em uma combo, ele mostra o primeiro item que o conteudo contenha o que voce digitou. Exemplo de em digitar 'C' ele vai mostrar o primeiro item com C (Carlos) e o cursor ficara parado entre o C e o A, a pendida que eu vou digitando ele vai preenchento com um item que satisfaca o que eu digitei.
Igual a digitacao dos enderecos das paginas no explorer.

No seu formulario coloque.

    Private Sub cmb_fornecedor_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles cmb_fornecedor.KeyPress
        AUTO_PREENCHIMENTO_COMBO(cmb_fornecedor, e)
    End Sub

Onde cmb_fornecedor é a combo que tera o preenchimento automatico.

Crie um novo modulo assim.
Module Bib_Combo

    Sub AUTO_PREENCHIMENTO_COMBO(ByRef cmb_aux As ComboBox, ByVal tecla As System.Windows.Forms.KeyPressEventArgs)
        Dim KeyAscii As Integer = Asc(tecla.KeyChar)

        Select Case KeyAscii
            Case 13 'Enter key
                SendKeys.Send("{TAB}")
                tecla.Handled = True
            Case 8 'Enter backspace

            Case Else
                Dim Index As Integer = cmb_aux.FindString(cmb_aux.Text)
                Dim CharsTyped As Integer = cmb_aux.Text.Length
                If Index >= 0 Then
                    cmb_aux.SelectedIndex = Index
                    'Select the portion that was added
                    cmb_aux.SelectionStart = CharsTyped
                    cmb_aux.SelectionLength = cmb_aux.Text.Length
                End If
        End Select
    End Sub
End Module

A noite é uma criança e na madrugada nasce mais uma rotina.
Rochª


 


CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página