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 "
2
zadajte nasledujúce v prvej línii " Module1.vb " :
Dovoz System.Data.OleDb
Sims 3
Zadajte nasledujúce pod " Sub Main ( ) , " deklarovať svoje premenné :
Dim conn Ako OleDbConnection
Dim strSQL As String Dim
DS as DataSet
Dim tmpStr as String
4
Zadajte nasledujúci vytvoriť nový výberový dotaz na dotaz na " zákazníkov " tabuľka :
strSQL = " SELECT zákazníci , * FROM zákazníci , "
conn = New OleDbConnection _
( " Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = F : . \\ DemandStudios \\ Archive \\ Northwind 2007.accdb ; " )
5
Zadajte nasledujúci vytvoriť nové pripojenie k databáze :
Dim myConnection Ako OleDbConnection = New OleDbConnection
Dim da Ako OleDbDataAdapter
da = New OleDbDataAdapter ( strSQL , conn )
ds = new DataSet
6
Zadajte nasledujúce prechádzať všetky záznamy vrátené dotazom a uložiť ich do reťazec premenné :
da.Fill ( ds , " Zákazníci " )
každý rowCust V ds.Tables ( " Zákazníci " ) Riadky
tmpStr = tmpStr & . rowCust ( ďalej len " Spoločnosť" ) toString ( ) & " .