Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustite program Microsoft Visual Basic Express , a kliknite na tlačidlo " Nový projekt " na ľavom paneli obrazovky počítača . Kliknite na " Visual Basic " pod " Nainštalované šablóny " a kliknite na " Windows Forms aplikácie . " Kliknite na tlačidlo " OK " .
2
Double - kliknite na " listbox " na " Toolbox " paneli pridať nový ovládací prvok zoznam do formulára . Double - kliknite na tlačidlo " " na " Toolbox " paneli pridať nové tlačidlo .
3
Double - kliknite na " Button1 " otvorte modul " Form1.vb " . Zadajte nasledujúce vyššie uvedené " Public Class Form1 " deklarovať menný priestor :
Dovoz System.Data.OleDb
4
typu pod " button1_Click " nasledujúce deklarovať svoje premenné :
Dim oleDBConn Ako OleDbConnection
Dim strSQL As String Dim
DSET As DataSet
5
Zadajte nasledujúce definovať reťazec dotazu SQL a definovať pripojenie k databáze Northwind :
strSQL = " . SELECT * FROM Produkty Produkty , "
oleDBConn = New OleDbConnection _
( " Provider = Microsoft.ACE.OLEDB . 12,0 ; Data Source = C : \\ Northwind 2007.accdb ; " )
Upraviť nasledujúci riadok kódu , a zadajte cestu a názov databázy programu Access :
( " Provider = Microsoft . ACE.OLEDB.12.0 ; Data Source = C : \\ Northwind 2007.accdb ; " )
6
Zadajte nasledovné vykonať pripojenie a naplniť DataSet s dátami z tabuľky Výrobky :
Dim makeConn Ako OleDbConnection = New OleDbConnection
Dim dataAptr Ako OleDbDataAdapter
dataAptr = New OleDbDataAdapter ( strSQL , oleDBConn )
DSET = New DataSet
dataAptr.Fill ( DSET , " Produkty " )
7
Zadajte nasledujúci prístup k DataSet stĺpce a pridať informácie o stĺpci na ovládací prvok zoznam :
Pre každý myRows V dSet.Tables ( " produkty " ) . Riadky
Me.ListBox1.Items.Add ( myRows ( " Kód produktu " ) . toString )
Me.ListBox1.Items.Add ( myRows . ( " Názov produktu " ) toString )
Ďalšie
8
Zadajte nasledujúce zatvorte pripojenie :
makeConn.Close ( )
Stlačte " F5 " pre spustenie programu , a kliknite na tlačidlo " Button1 " spustiť kód .