Conectando a um banco de dados Microsoft Access usando o Visual Basic.NET pode fazer a sua aplicação VB mais dinâmica , utilizando dados do banco de dados diretamente de sua aplicação . A maneira mais rápida de se conectar ao seu banco de dados Access é usando o ActiveX Data Objects ( ADO ) . ADO fornece uma interface de nível de aplicativo baseado em COM para os provedores de dados OLE DB. Depois de estabelecer a conexão , você pode consultar as tabelas de banco de dados através do uso de " IDbDataAdapter " e objetos " DataSet " . Coisas que você precisa
Microsoft Visual Studio Fotografia dados Adamastor Acesso
Show Mais instruções
1

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

Clique duas vezes em "Button" para adicionar um novo botão ao seu formulário . Clique duas vezes em "Button1 " para criar um novo evento para este botão clique
3

Defina a seqüência de conexão para o banco de dados Northwind de acesso: .

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

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

4

Definir uma instrução de consulta SQL para consultar o " funcionários " da tabela:

Dim qryStr as String = " . selecione funcionários * FROM Employees "

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

dbCmd.CommandText = qryStr

dbCmd.Connection = dbCon
5

Criar um adaptador de dados e preencher um " DataSet " com os resultados da consulta :

Dim da Como System.Data.IDbDataAdapter = Novo System.Data.OleDb.OledbDataAdapter

da.SelectCommand = dbcmd

Dim ds As System.Data.DataSet = Novo System.Data.DataSet

da.Fill ( ds )
6

Apresentar os resultados na " DataSet " usando uma " DataGridView "control :

Me.DataGridView1.DataSource = ds.Tables (0)
7

Imprensa " . F5 " para executar o programa e clique em" Button1 "
< br >