sábado, 25 de maio de 2013

on

Public Class Form1

  Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    'Informamos o modo do Complemento
    txtComplete.AutoCompleteMode = AutoCompleteMode.SuggestAppend
    'Informamos que a consulta será customizada
    txtComplete.AutoCompleteSource = AutoCompleteSource.CustomSource

    'Criamos a lista que será consultada
    Dim lista As New AutoCompleteStringCollection
        lista.Add("VB .Net")
        lista.Add("Java")
        lista.Add("Oracle")
        lista.Add("SQL")

    'Informamos a fonts customizada para a consulta
    txtComplete.AutoCompleteCustomSource = lista
  End Sub

End Class


 Espero ter ajudado... Abraços!

0 comentários:

Postar um comentário