Programação  
 
Conhecimento computador >> Programação >> Programação Visual Basics >> 
Como salvar todos os itens da caixa de lista para um banco de dados em VB
Salvando todos os itens " ListBox " para um banco de dados Microsoft Access usando Visual Basic.NET ( VB.NET ) pode fazer a sua aplicação mais dinâmica , armazenando seus dados em um banco de dados . Em VB, você pode usar a interface OLE DB , que é um conjunto de interfaces baseadas em COM que permitem que você se conectar a um banco de dados Access. Depois de fazer a conexão, você pode criar ou atualizar as tabelas de sua aplicação VB . Coisas que você precisa
Microsoft Visual Studio
Show Mais instruções
1

Abra o Microsoft Visual Studio e clique em " New Project" no painel esquerdo da tela do computador . Expandir " Visual Basic ", localizado abaixo de " Modelos instalados . " Clique em " Windows", clique duas vezes em " Windows Forms Application " a partir do centro da janela de diálogo para criar um novo projeto.
2

duplo clique em " ListBox " para adicionar um novo controle de caixa de listagem ao seu formulário. Clique duas vezes em "Button" para adicionar um novo botão ao seu formulário.
3

Clique duas vezes no formulário para criar um evento de carregamento de formulário e adicione o seguinte código para adicionar cinco itens para a " ListBox : "

Me.ListBox1.Items.Add ( "DB item 1")

Me.ListBox1.Items.Add ( "DB item 2 " )

Me.ListBox1.Items.Add ( "DB item 3" )

Me.ListBox1.Items.Add ( "DB item 4" )

Me.ListBox1.Items.Add ( "DB item 5 " )
4

Retornar para exibição design do formulário e clique duas vezes em " Button1 "para criar um evento click para este botão. Adicione a seguinte linha de código para definir o caminho do banco de dados :

Dim dbConString As String = "Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C: \\ Adamastor 2007.accdb ; " < br >
5

Substitua "C: \\ Adamastor 2007.accdb " . na etapa anterior com o nome eo caminho do seu banco de dados Access
6

Criar a variável " dbCon " , que é usado para estabelecer a conexão com o banco , eo " insertItems " variável string, que é usado para construir a instrução SQL para inserir os itens :

Dim dbCon Como System.Data.IDbConnection = Novo System.Data.OLEDB . OleDbConnection ( dbConString )

Dim insertItems as String
7

Criar e executar um comando para construir uma nova tabela no banco de dados onde você irá inserir os itens " ListBox ": < br >

Dim qryStr As String = " CREATE TABLE tmpItemsTable ( itens de texto ); "

Dim dbcmd Como System.Data.IDbCommand = Novo System.Data.OleDb.OleDbCommand

dbcmd . CommandText = qryStr

dbCmd.Connection = dbCon

dbCon.Open ()

dbCmd.ExecuteNonQuery ()
8

Pressione " F5" para executar o programa e clique em " Button1 ".

Anterior :

Próximo : No
  Os artigos relacionados
·Como fazer Breakout em Visual Basic (VB) 
·Como converter uma String para INT em Classic ASP 
·Erro de log no arquivo de texto para uma aplicação VB…
·Como fazer um jogo Clicando Com Visual Basic 
·Funções VB6 corda 
·Como usar uma classe de região para remover partes de …
·Como Fazer um Clicker Auto em Visual Basic 2010 
·O Que Esperar um Fim de Expressão média em VB 
·Como fazer um menu drop Down ou Tab em Visual Basic 6 
·Como configurar implantação em VBS 
  Artigos em destaque
·O que é JDBC Abstraction 
·Como remover CSVs duplicados no PHP 
·Como executar um arquivo SRC 
·Como excluir Do Tablename em um DataBaseName no MySQL 
·Como converter uma string para um DataSet 
·Erros Índice não identificados em PHP 
·Como converter para Hex Usando C + + 
·Como percorrer o código Python 
·Como substituir um personagem em Vb.net 2003 
·O que são valores passo para Python 
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados