Para quem já esta familiarizado com o ambiente de programação do vb.NET ou mesmo os seus antecessores, está, deve ser uma tarefa muito simples.
Mas pra quem esta iniciando agora na programação com vb.NET e quer melhorar seus projetos, aqui vai uma dica de como usar um procedimento em vb.Net para preencher de forma dinâmica sua combobox com valores extraídos de uma tabela.
Para o exemplo a seguir usei um banco de dados Access, mas este procedimento pode ser usado com qualquer banco de dados, desde que seja feito as devidas alterações para conexão com o banco de dados.
Junto com o exemplo estou enviando um Modulo, local utilizado para armazenas as rotinas criadas por você, ou neste caso por mim, neste modulo já estão rotinas de conexão com banco de dados, insert, consulta e outras.
Estas rotinas são explicadas em outros posts que você pode consultar aqui.
veja o código fonte de nosso exemplo de hoje:
Public Sub preenche_combobox_UF()
‘nome do procedimento preenche_combobox_UF()
‘
Dim cmd As New OleDbCommand
‘declaração de um novo componente usado na execução de comandos para conexão OleDB
‘
Conectar()
‘Uso da função de conectar o banco de dados :
‘
Dim reader As OleDbDataReader
‘componente para armazenar o retorno do banco na memoria do computador.
‘
cmd = New OleDbCommand("select id_UF from UF", conecta)
‘Comando SQL para pegar informação do banco de dados.
‘
reader = cmd.ExecuteReader
‘Armazenando no reader, memória do computador.
‘
While reader.Read
frmCliente.cmbUF.Items.Add(reader.Item("id_UF"))
End While
‘Lendo do reader e adicionando no combobox
‘
Desconectar()
‘Função para desconectar do banco de dados.
‘
End Sub
Baixe o exemplo compactado aqui.
Para usa-lo é necessário o Visual Studio 2010
Combobox sem os valores:
Clique no botão preencher combobox:
Agora veja como a combobox foi preenchida.
Duvidas deixe seu comentário entraremos em contato.

