August 2
Avere la conoscenza per eseguire query di Microsoft Access da un'applicazione Visual Basic.NET può aiutare a rendere l'applicazione più dinamico. Access è un sistema di gestione di database relazionali incluso nella suite Microsoft Office. Visual Basic.NET è un linguaggio di programmazione utilizzato per sviluppare applicazioni Windows ed è relativamente facile da usare. E 'spesso necessario per effettuare gli aggiornamenti di un database di Access da un'applicazione Visual Basic in base all'input dell'utente. In pochi passi, è possibile scrivere codice Visual Basic per eseguire le query in Access.
1 Avviare Microsoft Office Access e selezionare "Database vuoto." Nome del database "QueryTest" e fare clic su "Crea".
2 Creare una nuova tabella e il nome "Table1". Il primo tipo di riga "John" sotto "Field1" e "Smith" sotto "Campo2."
Aggiungere un'altra riga digitando "Jaime" sotto "Field1" e "Gonzalez" sotto "Campo2."
Salva "Table1" e vicino.
3 Avviare Microsoft Visual Basic 2010 Express e selezionare "New Project" nel menu "File". Selezionare "Applicazione Windows Form" e fare clic su "OK".
Fai clic su "Strumenti" nel riquadro a sinistra della finestra e fare doppio clic su "Pulsante" per aggiungere un pulsante al form. Fare doppio clic su "Button1" per aprire il modulo "Form1.vb", dove potrete digitare il codice.
4 Tipo "Imports System.Data.OleDb" sulla parte superiore del modulo "Form1.vb".
Fare clic all'interno "Private Sub Button1_Click" per iniziare a digitare il codice Visual Basic.
5 Digitare la seguente per dichiarare le variabili di connessione e di comando:
myConnToAccess fioco come OleDbConnection
mySQLCommand fioco come OleDbCommand
Dim mySQLStrg As String
6 Digitare la seguente per aprire una connessione al "QueryTest" database di Access:
myConnToAccess = new OleDbConnection ( "Provider = Microsoft.Jet.OLEDB.4.0; Dati Source = C: \ QueryTest.mdb;")
myConnToAccess.Open ()
Modifica "Source = C: \ QueryTest.mdb" e immettere il percorso in cui è stato salvato il database di Access.
7 Digitare quanto segue per eseguire una query "Elimina" nel database:
mySQLStrg = "DELETE FROM Table1.Field1 Table1 WHERE (((Table1.Field1) = 'John'));"
mySQLCommand = Nuovo OleDbCommand (mySQLStrg, myConnToAccess)
mySQLCommand.ExecuteNonQuery ()
Si eliminare il record in cui "Field1" è uguale a "John".
Premere il tasto "F5" per eseguire il programma e fare clic su "Button1".