Saper eseguire Microsoft Office Access query utilizzando Visual Basic.NET (VB.NET) può risparmiare tempo se si lavora con un database. Access è un sistema di gestione di database relazionali incluso nella suite Microsoft Office. VB.NET è un linguaggio di programmazione orientato agli oggetti utilizzati per creare applicazioni Windows. Una query di azione viene utilizzata per apportare modifiche a un database esistente. In pochi passi è possibile scrivere codice VB.NET per eseguire query di comando per creare ed eliminare una tabella in un database.

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." Premere il tasto "Ctrl" e "A", quindi premere "Elimina" per rimuovere il codice corrente.

2 Copia e incolla il seguente codice al modulo "Module1.vb" per eseguire una query e creare una tabella nel database Northwind quindi eseguire un'altra query e eliminare la tabella che è stata creata. Il database Northwind è incluso nella suite Microsoft Office.

Imports System.Data.OleDb

Module Module1

Sub Main()

myConnToAccess fioco come OleDbConnection

mySQLCommand fioco come OleDbCommand

Dim mySQLStrg As String

myConnToAccess = new OleDbConnection ( "Provider = Microsoft.ACE.OLEDB.12.0; Dati Source = C: \ Northwind 2007.accdb;")

myConnToAccess.Open ()

mySQLStrg = "CREATE TABLE tableToDelete ([Index] NUMERO, TESTO [Desc]);"

mySQLCommand = Nuovo OleDbCommand (mySQLStrg, myConnToAccess)

mySQLCommand.ExecuteNonQuery ()

MsgBox ( "tableToDelete è stato creato nel database Northwind")

mySQLStrg = "DROP TABLE tableToDelete;"

mySQLCommand = Nuovo OleDbCommand (mySQLStrg, myConnToAccess)

mySQLCommand.ExecuteNonQuery ()

MsgBox ( "tableToDelete è stato eliminato")

myConnToAccess.Close ()

End Sub

Modulo fine

3 Modificare la seguente riga di codice e digitare il percorso al database:

OleDbConnection ( "Provider = Microsoft.ACE.OLEDB.12.0; dati

Source = C: \ Northwind 2007.accdb; ")

Premere il tasto "F5" per eseguire il programma.