No Visual Basic , o objeto de vinculação e incorporação , banco de dados (OLE DB) interface de programação de aplicativo permite que você conecte o seu programa para um banco de dados . Com ele, você pode salvar informações do seu projeto para uma tabela em seu banco de dados e reutilizá-lo em outras aplicações. Você pode criar as suas variáveis ​​em qualquer lugar em seu projeto , como de caixas de texto, caixas de seleção ou seleções da lista, apenas certifique-se o seu tipo de dados variável corresponde ao tipo de dados do campo na tabela do banco de dados. Instruções
1

Abra o Visual Basic e começar um novo projeto. Abra a janela de código e criar uma função digitando " Private Sub addRecord ()"
2

Digite as seguintes linhas para criar variáveis ​​que irão se conectar ao banco de dados : .

Dim dbCon As New OleDb.OleDbConnection

Dim dataSet As New DataSet

Dim dataAdap como OleDb.OleDbDataAdapter

Dim sqlCommand As String

Os " dbCon " estabelece variáveis uma conexão com o banco de dados, "dataset " contém dados a partir dele, " dataAdap " executa os comandos e interage com o banco de dados, e " sqlCommand " tem suas dúvidas.
3

Ligue para o seu banco de dados com as seguintes linhas :

dbCon.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = path_to_database "

dbCon.Open ()

Substitua o parcela " path_to_database " com a localização física do seu banco de dados em seu computador. Esta linha liga o seu programa Visual Basic para o seu banco de dados e segunda linha abre o banco de dados
4

Digite as seguintes linhas para carregar os dados de seu banco de dados: .

SqlCommand = "SELECT * FROM tblContacts "

dataAdap = Novo OleDb.OleDbDataAdapter ( sqlCommand , dbCon )

dataAdap.Fill ( dataset," Banco de Dados " )

seu adaptador de dados passou a deter toda a registros dentro de sua mesa . Você pode usar um nome diferente de " banco de dados" para melhor identificar sua mesa. Por exemplo, se sua tabela contém informações de contato, você pode nomear esta "Contatos"
5

Criar as seguintes variáveis: .

Dim comBuild As New OleDb.OleDbCommandBuilder ( dataAdap )

Dim dataNewRow Como DataRow

A primeira linha valida um comando de inserção em sua mesa quando se utiliza um DataRow. A segunda linha cria o objeto DataRow
6

Digite as seguintes linhas para adicionar uma nova linha à tabela em seu banco de dados e salvar suas variáveis ​​para campos no registro : .

DataNewRow = dataSet.Tables ( "Banco de Dados " ) . NewRow ()

dataNewRow.Item (1) = variable1

dataNewRow.Item (2) = variavel2

dataNewRow.Item ( " field_name ") = variavel3

dataSet.Tables ( "Banco de Dados " ) Rows.Add ( dataNewRow )

dataAdap.Update ( dataset, " Banco de Dados" ) .

a primeira linha prepara um novo registro com campos vazios. As próximas três linhas adicionar informações. Os dois primeiros usam os números de índice de campos da tabela e inserir essas variáveis ​​para o primeiro e segundo campos no registro . A terceira usa o nome do campo para identificar em qual campo para armazenar a variável. A quinta ea sexta linhas de adicionar o registro com suas variáveis ​​para a sua mesa e comprometer os dados
7

Digite a seguinte linha para fechar a conexão ao banco de dados : .

DbCon.Close ()

Chame sua função " addRecord ()" em outro lugar no seu código , como em um evento de clique de botão.