Verbinden mit einer Microsoft Access-Datenbank mit Visual Basic.NET können Sie Ihre VB-Anwendung mehr dynamische Datenbank mit Daten direkt aus Ihrer Anwendung . Der schnellste Weg , um Ihre Access-Datenbank ist die Verwendung von ActiveX Data Objects ( ADO) . ADO bietet eine COM-basierte Application-Level- Schnittstelle für OLE DB- Provider . Sobald Sie die Verbindung , können Sie Datenbank-Tabellen durch den Einsatz von " IDbDataAdapter " und " DataSet "-Objekte abfragen. Things You
Microsoft Visual Studio
Northwind Access-Datenbank
brauchen anzeigen Weitere Anweisungen
1
Starten Sie Microsoft Visual Studio , klicken Sie auf "Neues Projekt" aus dem linken Fenster von Ihrem Computer-Bildschirm , und erweitern Sie " Visual Basic " unter " Installierte Vorlagen . " Klicken Sie "Windows " und doppelklicken Sie auf "Windows Forms Application" aus der Mitte der Dialog um ein neues Projekt zu erstellen.
2
Doppelklicken Sie auf "Button" , um eine neue Schaltfläche, um Ihre Form hinzufügen . . Doppelklicken Sie auf " Button1 ", um eine neue Click-Ereignis für diese Schaltfläche zu erstellen
3
Definieren Sie die Verbindungszeichenfolge für die Northwind Access-Datenbank:
Dim dbConString As String = "Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C: \\ Nordwind 2007.accdb ; "
Dim DBCON Wie System.Data.IDbConnection = New System.Data.OleDb.OleDbConnection ( dbConString )
4
Definieren Sie eine SQL -Abfrage-Anweisung , um die "Mitarbeiter" Tabelle abzufragen :
Dim qryStr As String = "SELECT * FROM Mitarbeiter Mitarbeiter . "
Dim dbCmd Wie System.Data.IDbCommand = New System.Data.OleDb.OleDbCommand
dbCmd.CommandText = qryStr
dbCmd.Connection = DBCON
5
erstellen einer Daten -Adapter und füllen einen " DataSet " mit den Abfrage-Ergebnisse :
Dim da Wie System.Data.IDbDataAdapter = New System.Data.OleDb.OleDbDataAdapter
da.SelectCommand = dbCmd
< p > Dim ds As New System.Data.DataSet = System.Data.DataSet
da.Fill (ds)
6
Zeigen Sie die Ergebnisse in der " DataSet " mit einem " DataGridView " Steuerung:
Me.DataGridView1.DataSource = ds.Tables (0)
7
Presse " . F5 " , um das Programm ausführen und auf " Button1 "
< br >