Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustite program Microsoft Visual Basic 2010 Express , kliknite na " Súbor " a vyberte položku " Nový projekt ... " . Kliknite na " Windows Forms Applciation " a vyberte možnosť " OK " .
Double - kliknite na tlačidlo " Button " z menu " Nástroje " pridať nové tlačidlo " Form1 " . Double - kliknite na " Button1 " otvoriť " Form1.vb " . Zadajte " Imports System.Data.Odbc.OdbcConnection " v prvom riadku modulu " Form1.vb " .
2
Kliknite vnútri " Private Sub Button1_Click " a zadajte nasledujúce deklarovať svoje premenné a otvorte DSN pripojenie :
Dim loopCounter As Integer
Dim odbcConn Ako Odbc.OdbcConnection
odbcConn = New Odbc.OdbcConnection ( " DSN = myDSN " )
odbcConn.Open ( )
Edit " DSN = myDSN " pridať " DSN " meno
3
zadajte nasledujúci dotaz databázy Access . :
Dim OdbcDataAdapter ako nový Odbc.OdbcDataAdapter ( " SELECT * FROM Table1 Tabuľka 1 ; . " , odbcConn )
Dim odbcDataSet As New Data.DataSet
odbcDataAdapter.Fill ( odbcDataSet )
Edit " SELECT * FROM Table1 Tabuľka 1 , . " pridať svoj konkrétny dotaz
4
zadajte nasledujúce prechádzať dotazu a zobrazí sa okno so správou s informáciou z prvé pole : ...
loopCounter = 0 K odbcDataSet.Tables ( 0 ) Rows.Count - 1
MsgBox ( odbcDataSet.Tables ( 0 ) Riadky ( loopCounter ) Názov ( 0 ) )
Ďalšie
5
zadajte nasledujúce uvoľniť svoje premenné z pamäti :
odbcConn.Close ( )
odbcConn.Dispose ( )
odbcConn = Nothing
Stlačte " F5 " , spustiť program a kliknite na tlačidlo " Button1 " .
Copyright © počítačové znalosti Všetky práva vyhradené