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 ... " V ľavej table obrazovky . Double - kliknite na " Console Application . " Stlačte tlačidlo " Ctrl " a " A " a potom stlačte tlačidlo " Delete " odstrániť existujúce kód .
2
Skopírujte a vložte nasledujúci kód do modulu " Module1.vb " na vykonanie dotazu a pridať dve polia na " Produkty " tabuľky v databáze Northwind .
Dovoz System.Data.OleDb
Module Module1
Sub Main ( )
Dim northwindConn Ako OleDbConnection
Dim sqlComm Ako OleDbCommand
Dim strSQL As String
northwindConn = new OleDbConnection ( " Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C : \\ Northwind 2007.accdb ; " )
northwindConn.Open ( )
strSQL = " ALTER TABLE produkty " & _
" Pridať stĺpec Product_I Text ( 30 ) , Product_II text ( 30 ) , "
sqlComm = New OleDbCommand ( strSQL , northwindConn )
sqlComm.ExecuteNonQuery ( )
MsgBox ( " vloženie dvoch polí úspešne do tabuľky Products . " )
northwindConn.Close ( )
End Sub End Module
3
Upraviť nasledujúci riadok kódu a typu cesta k vašej databáze :
OleDbConnection ( " Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C : \\ Northwind 2007.accdb ; " )
Stlačte " F5 " pre spustenie váš program .