Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Otvorte program Microsoft Visual Basic Express a kliknite na tlačidlo " Nový projekt ... " na ľavom paneli obrazovky . Double - kliknite na " Console Application " , v strednej table okna " Nový projekt " . 
 2 
 Stlačte tlačidlo " Ctrl " a " A " a stlačte tlačidlo " Delete " odstrániť všetky existujúce kód . 
 
 3 
 skopírujte a vložte nasledujúci kód do vášho modulu " Module1.vb " prístup k dotazu pomocou jazyka Visual Basic.NET : 
 
 Dovoz System.Data.OleDb 
 
 Module Module1 
 
 Sub Main ( ) 
 
 Dim oleConn ako OleDbConnection 
 
 Dim SQLstr As String Dim 
 
 DSET ako DataSet 
 
 Dim strTmp As String 
 
 SQLstr = " SELECT * FROM Zákazníci Zákazníci ; . " 
 
 oleConn = New OleDbConnection _ 
 
 ( " Provider = Microsoft.ACE.OLEDB . 12,0 ; Data Source = C : \\ Northwind 2007.accdb ; " ) 
 
 Dim myConnection Ako OleDbConnection = New OleDbConnection 
 
 Dim da Ako OleDbDataAdapter 
 
 da = new OleDbDataAdapter ( SQLstr riadky < , oleConn ) 
 
 DSET = New DataSet 
 
 da.Fill ( DSET , " Zákazníci " ) 
 
každý rowCust V dSet.Tables ( " Zákazníci " ) . br >
strTmp = strTmp & rowCust ( ďalej len " Spoločnosť" ) toString ( ) a "