Ako ušetriť všetky položky zoznamu do databázy v VB

Ukladanie všetky " listbox " položky k databáze programu Microsoft Access pomocou jazyka Visual Basic.NET ( VB.NET ) môže vaše aplikácie viac dynamická ukladanie dát v databáze . Vo VB , môžete použiť rozhranie OLE DB , čo je sada rozhranie COM - založené , ktoré vám umožní pripojiť k databáze programu Access . Akonáhle vykonáte pripojenie , môžete vytvoriť alebo aktualizovať tabuľky z VB aplikácie . Veci , ktoré budete potrebovať v Microsoft Visual Studio
Zobraziť ďalšie inštrukcie Cestuj 1

Spustite program Microsoft Visual Studio a kliknite na tlačidlo " Nový projekt " od ľavej table obrazovky počítača . Rozbaľte " Visual Basic " , umiestnené pod " Nainštalované šablóny . " Kliknite na položku " Windows " , potom dvakrát kliknite na " Windows Forms aplikácie " od stredu okna na vytvorenie nového projektu .
2

Double - kliknite na " listbox " pridať nový ovládací prvok zoznam do formulára . Double - kliknite na " tlačidlo " pridať nové tlačidlo do formulára .
3

Dvakrát kliknite na formulár vytvoriť udalosť Load formulára a pridajte nasledujúci kód pridajte päť položiek do " listbox "

Me.ListBox1.Items.Add ( " DB bod 1 " )

Me.ListBox1.Items.Add ( " DB bod 2 " )

Me.ListBox1.Items.Add ( " DB bod 3 " )

Me.ListBox1.Items.Add ( " DB bod 4 " )

Me.ListBox1.Items.Add ( " DB bod 5 " )
4

Prepnite späť na formulár návrhovom zobrazení a dvakrát kliknite na " Button1 " vytvoriť udalosť click na toto tlačidlo . Pridajte nasledujúci riadok kódu definovať cestu k databáze :

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

5

Nahradiť " C : \\ Northwind 2007.accdb " . sa v predchádzajúcom kroku s názvom a cestou z databázy programu Access
6

Vytvorte " dbCon " premenné , ktoré používa sa na vytvorenie pripojenia k databáze , a " insertItems " string premenná , ktorá sa používa na vytvorenie príkazu SQL pre vloženie položiek :

Dim dbCon Ako System.Data.IDbConnection = Nové System.Data.OleDb . OleDbConnection ( dbConString )

Dim insertItems As String
7

vytvoriť a spustiť príkaz na vytvorenie novej tabuľky v databáze , kde budete vložiť " listbox " položky:

Dim qryStr As String = " CREATE TABLE tmpItemsTable (Položky znenie ) ; "

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

dbCmd . CommandText = qryStr

dbCmd.Connection = dbCon

dbCon.Open ( )

dbCmd.ExecuteNonQuery ( )
8

Stlačte " F5 " spustiť program a kliknite na tlačidlo " Button1 . "

• Predchádzajúca strana: Ako čítať XML a vyplnenie textových polí 
• Ďalšia strana: Ako si vyrobiť webových formulárov z jazyka