Ako získať prístup VB otázku

Vedieť , ako vykonávať dotazy a prístup informácie vrátené dotazom pomocou aplikácie Microsoft Visual Basic.NET vám môže ušetriť čas , ak pracujete s databázami . Microsoft Office Access je relačný databázový systém ponúkaný v balíku Office , zatiaľ čo dotaz sa používa na načítanie informácií z databázovej tabuľky . VB.NET je programovací jazyk , ktorý je relatívne ľahké sa naučiť a používať . Našťastie , môžete napísať VB kód a pristupovať otázku VB behom niekoľkých minút . Veci , ktoré budete potrebovať v Microsoft Visual Basic Express
databázy Northwind Access
Zobraziť ďalšie inštrukcie Cestuj 1

Otvorte program Microsoft Visual Basic Express . Kliknite na tlačidlo " Nový projekt ... , " a potom vyberte "Windows Forms . " Kliknite na tlačidlo " OK " .
2

Double - kliknite na " tlačidlo " na " Toolbox " paneli pridať nový ovládací prvok tlačidla . Double - kliknite na " DataGridView " pre pridanie nového ovládacieho prvku mriežky . Double - kliknite na " Button1 " otvorte modul " Form1.vb " . Stlačte tlačidlo " Ctrl " a " A " súčasne nasleduje " Delete " odstrániť všetky existujúce kód .
3

Skopírujte a vložte nižšie uvedený kód pripojiť k databáze Northwind , dotaz " produkty " tabuľka a zobrazenie obsahu cez " Dátový Grid View " ovládanie :

Dovoz System.Data.Odbc.OdbcConnection

Public Class Form1

Private Sub Button1_Click ( byval sender ako System.Object , byval e ako System.EventArgs ) Kľuky Button1.Click klipart

Dim nwindConn ako Odbc.OdbcConnection

Dim qryStr As String

nwindConn = Nové Odbc.OdbcConnection ( " DSN = Northwind " )

nwindConn.Open ( )

qryStr = " SELECT produkty . [ Kód produktu ] , produkty . [ Názov produktu ] "

qryStr = qryStr & " Products.Description , tovar . [ Standard Cost ] , "

qryStr = qryStr a " produkty . [ Cena ] , produkty . [ Zmena poradia Level ] "

qryStr = qryStr & " FROM Produkty , "

Dim da As New Odbc.OdbcDataAdapter ( qryStr , nwindConn )

Dim ds ako New Data.DataSet

da.Fill ( ds , " myTable " )

S DataGridView1

. DataSource = ds.Tables ( " moje_tabulka " )

End With

nwindConn.Close ( )

nwindConn.Dispose ( )

nwindConn = Nothing

End Sub End Class

4

Upraviť nasledujúci riadok kódu odstránenie " Northwind " a zadaním mena DSN ( DSN = ) :

nwindConn = New Odbc.OdbcConnection ( " DSN = Northwind " )

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

• Predchádzajúca strana: Ako pridať komentár udalosť v jazyku Visual Basic 
• Ďalšia strana: Ako sa dostať na počet riadkov v FlexGrid v jazyku Visual Basic