Come utilizzare un VB per chiamare accedere a una query

May 18

Come utilizzare un VB per chiamare accedere a una query


Sapendo come interrogare una tabella di database di Access utilizzando Microsoft Visual Basic.NET può rendere l'applicazione di Windows più dinamico. Access è un sistema di gestione di database relazionali incluso nella suite Microsoft Office. VB.NET è un linguaggio di programmazione utilizzato per creare applicazioni Windows. In pochi passaggi, è possibile creare un'applicazione VB.NET per accedere al database Northwind incluso con MS Office e interrogare la tabella di clienti.

istruzione

1 Aprire Microsoft Visual Basic Express e fare clic su "Nuovo progetto ..." nel riquadro a sinistra dello schermo. Fare doppio clic su "Applicazione console."

2 Digitare quanto segue nella prima riga del "Module1.vb":

Imports System.Data.OleDb

3 Digitare quanto segue al di sotto di "Sub Main ()" per dichiarare le variabili:

conn fioco come OleDbConnection

Dim strSQL As String

Dim ds As DataSet

Dim tmpStr As String

4 Digitare la seguente per creare una nuova query di selezione per interrogare la tabella "Clienti":

strSQL = "SELECT Customers.* FROM Customers;"

conn = nuovo OleDbConnection _

( "Provider = Microsoft.ACE.OLEDB.12.0; Dati Source = F: \ DemandStudios \ Archive \ Northwind 2007.accdb;")

5 Digitare la seguente per creare una nuova connessione al database:

Dim myConnection As OleDbConnection = New OleDbConnection

da fioco come OleDbDataAdapter

da = new OleDbDataAdapter (strSQL, conn)

ds = new DataSet

6 Digitare quanto segue per scorrere tutti i record restituiti dalla query e salvarli in una variabile stringa:

da.Fill(ds, "Customers")

Per ogni rowCust In ds.Tables ( "I clienti"). Righe

tmpStr = tmpStr & rowCust ( "Società") ToString () e. "|"

tmpStr = tmpStr & rowCust ( "Cognome") ToString () e. "|"

tmpStr = tmpStr & rowCust ( "Nome") ToString () e. "|" & vbLf

Il prossimo

7 Digitare il seguente per restituire i risultati nella finestra della console:

System.Console.Write (tmpStr)

MsgBox ( "Fatto!")

8 Digitare quanto segue per chiudere la connessione al database:

myConnection.Close()

Premere il tasto "F5" per eseguire il programma.