No Visual Basic, caixas de combinação são muitas vezes utilizados em programas de entrada de dados e quando a apresentação de informações através de formulários on-line. Por exemplo, você pode precisar escolher entre uma lista de estados ou códigos postais e clicando uma lista drop -down apresenta-lhe várias seleções . Uma caixa de combinação é preenchida com itens definidos pelo usuário que normalmente são adicionadas pelo programador em tempo de design , mas você também pode encher uma caixa de combinação com itens de uma tabela de banco de dados , usando apenas algumas linhas de código. Coisas que você precisa
Visual Basic instalado
arquivo de banco de dados
Show Mais instruções
1

Inicie o Visual Basic , clicando no botão "Iniciar " e selecione "Programas , " " Microsoft Visual Studio "e " Microsoft Visual Basic [ número da versão ] . "
2

Selecione " standard EXE "sob a caixa de diálogo " New Project " . Clique em "Abrir " para abrir um novo formulário.
3

Clique no controle " ComboBox " da caixa de ferramentas no lado esquerdo e arraste-o para a forma centro. Defina suas propriedades debaixo da janela Propriedades do lado direito.
4

Adicione um controle " ADO " no formulário. Defina sua propriedade "Visível " para "false ".
5

Clique no botão " View Code " na parte superior da janela do Project Explorer para começar a adicionar código. No exemplo abaixo , os 50 estados norte-americanos serão adicionados na caixa de combinação a partir de uma tabela de banco de dados. Quando o formulário é carregado em tempo de execução , a caixa de combinação é preenchida automaticamente. Vá para o evento " Form_Load " e digite um código semelhante ao seguinte :

Dim conn Como rs New ADODB.ConnectionDim como nova ADODB.RecordsetSet conn = DBEngine.OpenDatabase ( App.Path & " \\ dbDatabase . mdb " ) Set rs = conn.OpenRecordset ( " tblStates " )

Se rs.RecordCount > 0 ThenDo Enquanto Não rs.EOFWith combo1.AddItem rs.Fields ( " USStateName ") End With.MoveNextLoopEnd Se
6

Pressione a tecla "F5" no seu teclado para executar o programa.
7

Salve seu projeto Visual Basic , clicando em " Arquivo" e depois em "Salvar projeto como " a partir do menu.