Het opslaan van alle " ListBox " items naar een Microsoft Access- database met behulp van Visual Basic.NET ( VB.NET ) kan uw toepassing dynamischer te maken door het opslaan van uw gegevens in een database . In VB , kunt u gebruik maken van de OLE DB -interface , dat is een set van COM - gebaseerde interfaces waarmee u verbinding met een Access-database . Nadat u de verbinding , kunt u tabellen maken of bijwerken van uw VB -toepassing. Wat je nodig hebt
Microsoft Visual Studio
Toon Meer Aanwijzingen
1 Lancering Microsoft Visual Studio en klik op " New Project" van het linkerpaneel van uw computerscherm . Expand " Visual Basic , " die zich onder " Geïnstalleerde sjablonen . " Klik op " Windows ", dubbelklik op " Windows Forms Application " van het centrum van het dialoogvenster om een nieuw project aan te maken .
Dubbelklik op " ListBox " 2 naar een nieuwe keuzelijst toe te voegen aan uw formulier . Dubbelklik op " knop" om een nieuwe knop toe te voegen aan uw formulier .
3 Dubbelklik op het formulier om een formulier load gebeurtenis te maken en voeg de volgende code toe aan vijf items toe te voegen aan de " ListBox : " Me.ListBox1.Items.Add ( " DB Item 1 " ) Me.ListBox1.Items.Add
( " DB punt 2 " ) op Twitter Me.ListBox1.Items.Add ( " DB punt 3 " ) Me.ListBox1.Items.Add ( " DB punt 4 " ) Me.ListBox1.Items.Add ( " DB
punt 5 " ) op Twitter Switch 4 terug naar de ontwerpweergave en dubbelklik op Formulier " Button1 " naar een gebeurtenis click voor deze toets te maken . Voeg de volgende regel code om het pad van uw database te definiëren : Dim dbConString
As String = " Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C : \\ Noordenwind 2007.accdb ; " < br >
5 Vervang " C : \\ Northwind 2007.accdb " . bij de vorige stap met de naam en het pad van uw Access-database
6 Maak de " dbCon " variabele , die wordt gebruikt om de database connectie , en de " insertItems " string variabele , welke wordt gebruikt om de SQL-instructie te bouwen om de items in te voegen: Dim dbCon
Zoals System.Data.IDbConnection = Nieuw System.Data.OleDb . OleDbConnection ( dbConString ) Dim insertItems
als Koord
7 maken en uitvoeren van een opdracht om een nieuwe tabel in de database waar u de " ListBox " items zullen voegen bouwen : < br Dim qryStr > As String = " CREATE TABLE tmpItemsTable ( Artikelen TEKST ) ; " Dim dbCmd
Zoals System.Data.IDbCommand = Nieuwe System.Data.OleDb.OleDbCommand
dbCmd . CommandText = qryStr dbCmd.Connection
= dbCon dbCon.Open
( ) dbCmd.ExecuteNonQuery
( )
Druk op " F5 " 8 om het programma uit te voeren en klik op " Button1 . "
|
