Gewusst wie: hinzufügen eine neue Zeile einer Abfrage in VB Zugriff auf

June 10

Gewusst wie: hinzufügen eine neue Zeile einer Abfrage in VB Zugriff auf

Zu wissen, wie eine Abfrage mithilfe von Visual Basic, auch bekannt als VB zugreifen kann die Anwendung dynamischer gestaltet. VB ist eine objektorientierte Programmiersprache zum Erstellen von Windows-Anwendungen verwendet. VB wird häufig von Programmierern aufgrund seiner Flexibilität beim Herstellen-Datenbankverbindungen verwendet. Eine Abfrage wird verwendet, um Informationen in einer Datenbanktabelle zugreifen. Dies ist ein einfaches Beispiel wie Sie eine Abfrage, die Abrufen von Daten aus einer Microsoft Office Access-Datenbank zugreifen und über das Konsolenfenster angezeigt.

Anweisungen

1 Öffnen Sie Microsoft Visual Basic Express Edition, und klicken Sie auf "New Project..." im linken Bereich des Bildschirms. Doppelklicken Sie im mittleren Bereich des Fensters "Neues Projekt" auf "Console Application".

2 Drücken Sie "Strg" und "A" und dann "Löschen", um alle vorhandenen Code löschen.

3 Kopieren Sie und fügen Sie den folgenden Code in Ihre "Module1.vb"-Modul, um eine Abfrage mithilfe von Visual Basic zugreifen:

System.Data.OleDb importiert

Modul Modul1

Sub Main()

Dim oleConn As OleDbConnection

Dim SQLstr As String

Dim dSet As DataSet

Dim strTmp As String

SQLstr = "SELECT Customers.* FROM Customers;"

oleConn = New OleDbConnection _

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

Dim myConnection As OleDbConnection = New OleDbConnection

Dim da As OleDbDataAdapter

da = New OleDbDataAdapter(SQLstr, oleConn)

dSet = New DataSet

da.Fill(dSet, "Customers")

For Each rowCust In dSet.Tables("Customers").Rows

strTmp = strTmp & rowCust("Company").ToString() & "|"

strTmp = strTmp & rowCust("Last Name").ToString() & "|"

strTmp = strTmp & rowCust("First Name").ToString() & "|" & vbLf

Next

System.Console.Write(strTmp)

MsgBox("Done!")

myConnection.Close()

End Sub

Ende-Modul

4 Bearbeiten Sie den Pfad zu Ihrer Datenbank enthalten die folgende Codezeile:

("Provider=Microsoft.ACE.OLEDB.12.0;Data Quelle = C:\Northwind 2007.accdb;")

Mit "F5" um das Programm auszuführen.