Como acessar um banco de dados no VB.net

Escrito por jaime avelar | Traduzido por francisco de castro
  • Compartilhar
  • Tweetar
  • Compartilhar
  • Pin
  • E-mail
Como acessar um banco de dados no VB.net
Consulte a tabela funcionários do Northwind em Visual Basic (Comstock/Comstock/Getty Images)

Conectar-se ao banco de dados Microsoft Access utilizando o Visual Basic .NET pode tornar um aplicativo VB mais dinâmico, pois o banco de dados pode ser acessado diretamente do aplicativo. A maneira mais rápida de se conectar é utilizando o ActiveX Data Objects (ADO). Ele fornece uma interface de nível de aplicativo baseada em COM para provedores de dados OLE DB. Uma vez que a conexão estiver estabelecida, pode-se consultar as tabelas do banco de dados através da utilização do "IDbDataAdapter" e dos objetos "DataSet".

Nível de dificuldade:
Moderado

Outras pessoas estão lendo

O que você precisa?

  • Microsoft Visual Studio
  • Banco de dados Access do Northwind

Lista completaMinimizar

Instruções

  1. 1

    Inicie o Microsoft Visual Studio, clique em "New Project" (Novo projeto) no painel esquerdo da tela do computador e expanda "Visual Basic" abaixo de "Installed Templates" (Modelos instalados). Clique em "Windows" e dê um duplo clique em "Windows Forms Application" (Aplicativo de formulários do Windows) no centro da janela de diálogo para criar um novo projeto.

  2. 2

    Dê um duplo clique em "Button" (Botão) para adicionar um novo botão ao formulário. Dê um duplo clique em "Button1" (Botão1) para criar um novo evento de clique para esse botão.

  3. 3

    Defina a "string" de conexão que será utlizada no banco de dados Access do Northwind:

    Dim dbConString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Northwind 2007.accdb;" Dim dbCon As System.Data.IDbConnection = New System.Data.OleDb.OleDbConnection(dbConString)

  4. 4

    Defina uma instrução de consulta SQL para consultar a tabela de "Employees" (Empregados):

    Dim qryStr As String = "SELECT Employees.* FROM Employees" Dim dbCmd As System.Data.IDbCommand = New System.Data.OleDb.OleDbCommand dbCmd.CommandText = qryStr dbCmd.Connection = dbCon

  5. 5

    Crie um adaptador de dados e preencha um "DataSet" com os resultados da consulta:

    Dim da As System.Data.IDbDataAdapter = New System.Data.OleDb.OleDbDataAdapter da.SelectCommand = dbCmd Dim ds As System.Data.DataSet = New System.Data.DataSet da.Fill(ds)

  6. 6

    Exiba os resultados no "DataSet" utilizando um controle "DataGridView":

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

  7. 7

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

Não perca

Filtro:
  • Geral
  • Artigos
  • Slides
  • Vídeos
Mostrar:
  • Mais relevantes
  • Mais lidos
  • Mais recentes

Nenhum artigo disponível

Nenhum slide disponível

Nenhum vídeo disponível