È spesso necessario esportare i dati di accesso da Visual Basic se è necessario modificare ulteriormente i dati tramite query in Access. In VB si può usare il " OleDbConnection " per fare una connessione per accedere , e quindi la classe " OleDbCommand " viene utilizzato per creare tabelle o inserire dati in tabelle di Access . Un controllo visualizzazione griglia dati è comunemente utilizzato in VB per visualizzare i dati in formato tabulare simili a una tabella di database . Utilizzando un controllo visualizzazione griglia dei dati per visualizzare i dati è utile per l'utente e per i programmatori per l'esportazione in una tabella di Access . Istruzioni
1

Avviare Microsoft Visual Basic Express , fare clic su " Nuovo progetto ... " nel riquadro di sinistra del vostro schermo . Selezionare " Applicazione Windows Form ". Fare clic su "OK".

2 Fare doppio clic su " DataGridView " nel riquadro " Casella degli strumenti " per aggiungere un nuovo controllo visualizzazione griglia dati . Aggiungere un nuovo pulsante con la stessa tecnica .
3

Fare doppio clic sul form per creare un evento di caricamento per il modulo. Digitare il seguente codice per aggiungere dati al controllo griglia : .

Me.DataGridView1.ColumnCount = 2

DataGridView1

RowHeadersVisible = False

. colonne ( 0 ) . Name = "Tipo"

. colonne ( 1) . Name = "Stato"

. SelectionMode = DataGridViewSelectionMode.FullRowSelect

End With

Dim row0 As String ( ) = { " iPad" , " Sold out "}

Dim row1 As String ( ) = { " Monitor " , " disponibile "}

Me.DataGridView1.Rows

. Aggiungi ( row0 ) per

. Aggiungi ( row1 ) per

End With
4

Clicca " Form1.vb [ design] "e fare doppio clic su " Button1 "per creare un evento click del pulsante . Digitare il seguente codice per dichiarare nuove variabili verranno utilizzate per esportare i dati di visualizzazione della griglia di dati :

Dim dbConn Come OleDbConnection

Dim DbCommand Come OleDbCommand

Dim SQLString As String

5

digitare quanto segue per creare e aprire la connessione ad Access :

dbConn = New OleDbConnection ( "Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C : \\ Northwind 2007.accdb ; " ) per

dbConn.Open ( ) economici 6

Creare una nuova tabella in Access in cui verranno esportati i dati di :

SQLString = " CREATE TABLE GridData (tipo di testo , testo di stato ) "

DbCommand = New OleDbCommand ( SQLString , dbConn ) per

dbCommand.ExecuteNonQuery ( ) economici 7

loop attraverso ogni cella nel controllo di visualizzazione griglia dei dati ed esportare i dati per la tabella di Access creato nel passaggio precedente , aggiungendo il seguente codice :

per ogni riga Come DataGridViewRow in DataGridView1.Rows

SQLString = " INSERT INTO GridData ( tipo, stato ) "

SQLString = SQLString & " VALUES ( ' " & row.Cells.Item ( "Tipo" ) . Value & "' , "

SQLString = SQLString & " ' " & row.Cells.Item ( "Stato" ) . Value & "' ) "

DbCommand = New OleDbCommand ( SQLString , dbConn ) per

dbCommand.ExecuteNonQuery ( )

Avanti

dbConn.Close ( ) economici 8

Premere " F5 " per eseguire il programma e fare clic su " Button1 " per esportare i dati di accesso . < br >