Como executar consultas do Access no Visual Basic

Ter o conhecimento para executar consultas do Microsoft Access em um aplicativo Visual Basic.NET pode ajudá-lo a tornar seu aplicativo mais dinâmico. O Access é um sistema de gerenciamento de banco de dados relacional incluído no pacote Microsoft Office. O Visual Basic.NET é uma linguagem de programação usada para desenvolver aplicativos Windows e é relativamente fácil de usar. Geralmente, é necessário fazer atualizações em um banco de dados do Access a partir de um aplicativo Visual Basic com base nos dados de entrada do usuário. Em algumas etapas, você pode escrever o código do Visual Basic para executar consultas no Access.

Passo 1

Execute o Microsoft Office Access e selecione “Banco de dados em branco”. Nome do banco de dados como “QueryTest” e clique em “Criar”.

Etapa 2

Crie uma nova tabela e denomine “Tabela1”. Na primeira linha, escreva “John” em “Field1” e “Smith” em “Field2”.

Adicione outra linha digitando “James” em “Campo1” e “Gonzalez” em “Campo2”. Salve a tabela “Tabela1” e feche-a.

Etapa 3

Execute o Microsoft Visual Basic 2010 Express e selecione “Novo projeto” no menu “Arquivo”. Escolha “Aplicativo Windows Forms” e clique em “OK”.

Clique em “Barra de ferramentas” no painel esquerdo da sua janela e clique duas vezes em “Botão” para adicionar um botão ao seu formulário. Clique duas vezes em “Button1” para abrir o módulo “Form1.vb”, que é onde você escreverá seu código.

Etapa 4

Digite “Imports System.Data.OleDb” na parte superior do seu módulo “Form1.vb”. Clique em “Private Sub Button1_Click” para começar a escrever seu código do Visual Basic.

Etapa 5

Digite o seguinte para declarar suas conexões e variáveis ​​de comando:

Dim myConnToAccess As OleDbConnection Dim mySQLCommand As OleDbCommand Dim mySQLStrg As String

Etapa 6

Digite o seguinte para abrir uma conexão com o banco de dados do Access chamada “TestConsultation”:

myConnToAccess = Novo OleDbConnection (“Provedor = Microsoft.Jet.OLEDB.4.0; Fonte de dados = C: QueryTest.mdb;”) myConnToAccess.Open ()

Edite a parte do código “Source = C: QueryTest.mdb” e escreva o caminho no qual você salvou o banco de dados do Access.

Etapa 7

Digite o seguinte para executar uma consulta “Excluir” no seu banco de dados:

mySQLStrg = “DELETE Table1.Field1 FROM Table1 WHERE (((((Table1.Field1) = ‘John’)));” mySQLCommand = Novo OleDbCommand (mySQLStrg, myConnToAccess) mySQLCommand.ExecuteNonQuery ()

Com esta consulta, você excluirá o registro no qual “Campo1” é igual a “João”.

Pressione “F5” para executar o seu programa e clique em “Button1”.

Referências

 

Você pode estar interessado:

Deixe um comentário