Aprire Microsoft Visual Basic Express e fare clic su " Nuovo progetto ... " nel riquadro di sinistra del vostro schermo . Fare doppio clic su " Applicazione console ".
2
Digitare quanto segue nella prima linea di " Module1.vb " :
Imports System.Data.OleDb
3
Digitare il seguente sotto " Sub Main ( ) " per dichiarare le variabili :
Dim conn Come OleDbConnection
Dim strSQL As String Dim
Come DataSet ds
Dim tmpStr As String
4
Digitare quanto segue per creare una nuova query di selezione per interrogare la tabella "Clienti" :
strSQL = "SELECT I clienti * dalla clientela; "
conn = New OleDbConnection _
( " Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C : \\. DemandStudios \\ Archive \\ Northwind 2007.accdb , " ) economici 5
digitare quanto segue per creare una nuova connessione al database :
Dim myConnection Come OleDbConnection = New OleDbConnection
Dim da quanto OleDbDataAdapter
da = New OleDbDataAdapter ( strSQL , conn ) per
ds = New DataSet
6
digitare quanto segue per scorrere tutti i record restituiti dalla query e salvare una variabile stringa : .
da.Fill ( ds , "Clienti" ) per
Ogni rowCust In ds.Tables ( "Clienti" ) Righe
tmpStr = tmpStr & . rowCust ( "Società") ToString ( ) & "
Programmazione © www.354353.com