Salvare tutte le voci " ListBox " a un database di Microsoft Access utilizzando Visual Basic.NET ( VB.NET ) può rendere l'applicazione più dinamico con l'archiviazione dei dati in un database . In VB , è possibile utilizzare l' interfaccia OLE DB , che è un insieme di interfacce COM -based che consentono di connettersi a un database di Access . Una volta effettuata la connessione , è possibile creare o aggiornare le tabelle dalla vostra applicazione VB . Cose che ti serviranno
Microsoft Visual Studio
Show More Istruzioni
1

lancio di Microsoft Visual Studio e fare clic su " Nuovo Progetto" dal riquadro sinistro dello schermo del computer . Espandere " Visual Basic ", situato sotto " Modelli installati . " Fare clic su "Windows ", quindi fare doppio clic su " Applicazione Windows Form " dal centro della finestra di dialogo per creare un nuovo progetto .
2

doppio clic su " ListBox " per aggiungere un nuovo controllo casella di riepilogo al form. Fare doppio clic su "Pulsante " per aggiungere un nuovo pulsante al form .

3 Fare doppio clic sul form per creare un evento di caricamento form e aggiungere il seguente codice per aggiungere cinque elementi alla " ListBox : "

Me.ListBox1.Items.Add ( "DB articolo 1" ) per

Me.ListBox1.Items.Add ( "DB voce 2 " ) per

Me.ListBox1.Items.Add ( " DB voce 3 " ) per

Me.ListBox1.Items.Add ( " DB articolo 4" ) per

Me.ListBox1.Items.Add ( " DB articolo 5 " ) economici 4

Passare di nuovo alla forma visualizzazione Progettazione e fare doppio clic su " Button1 "per creare un evento click di questo pulsante. Aggiungere la seguente riga di codice per definire il percorso del database :

Dim dbConString As String = "Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C : \\ Northwind 2007.accdb ; " < br >
5

sostituire "C : \\ Northwind 2007.accdb " . nel passaggio precedente con il nome e il percorso del database di Access
6

Creare la variabile " dbCon " , che viene utilizzato per stabilire la connessione al database , e la variabile stringa " insertItems " , che viene utilizzato per creare l'istruzione SQL per inserire le voci :

Dim dbCon Come System.Data.IDbConnection = New System.Data.OleDb . OleDbConnection ( dbConString )

Dim insertItems As String
7

creare ed eseguire un comando per costruire una nuova tabella nel database , dove potrete inserire le voci " ListBox " : < br >

Dim qryStr As String = " CREATE TABLE tmpItemsTable ( elementi di testo ) ; "

Dim dbCmd Come System.Data.IDbCommand = New System.Data.OleDb.OleDbCommand

dbCmd . CommandText = qryStr

dbCmd.Connection = dbCon

dbCon.Open ( ) per

dbCmd.ExecuteNonQuery ( ) economici 8

Premere " F5 " per eseguire il programma e fare clic su " Button1 ".