Ako pridať pole Access pomocou jazyka Visual Basic

Vedieť , ako pridať nové pole do databázovej tabuľky aplikácie Microsoft Office Access pomocou jazyka Visual Basic.NET môžete vytvoriť svoj ​​program , dynamickejší . Access je relačný databázový systém zahrnuté do balíka Microsoft Office . VB.NET je objektovo orientovaný programovací jazyk často prednostné programátorov pre jeho jednoduché použitie . V niekoľkých krokoch môžete písať VB.NET kód pre vytvorenie novej tabuľky , potom použite " ALTER TABLE " vyhlásenie na vytvorenie nového poľa . Návod dovolená 1

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 tento kód do modulu " Module1.vb " .

Dovoz System.Data.OleDb

module Module1

Sub Main ( )

Dim myConnection Ako OleDbConnection

Dim myCommand Ako OleDbCommand

Dim mySQLString As String

myConnection = new OleDbConnection _

( " Provider = microsoft.jet.oledb.4.0 ; Data Source = D : \\ Temp \\ myTextData.mdb ; " )

myConnection.Open ( )

mySQLString = " CREATE TABUĽKA cutomers ( FIRST_NAME TEXT , last_name TEXT ) "

myCommand = New OleDbCommand ( mySQLString , myConnection )

myCommand.ExecuteNonQuery ( )

mySQLString = " INSERT INTO cutomers VALUES ( " JOHN " , " Smith " ) "

myCommand = New OleDbCommand ( mySQLString , myConnection )

myCommand.ExecuteNonQuery ( )

mySQLString = " INSERT INTO cutomers VALUES ( ' JOHN ' , ' SMITH ' ) "

myCommand = New OleDbCommand ( mySQLString , myConnection )

myCommand.ExecuteNonQuery ( )

mySQLString = " ALTER TABLE ADD cutomers rodového TEXT ; "

myCommand = New OleDbCommand ( mySQLString , myConnection )

myCommand.ExecuteNonQuery ( )

MsgBox ( " Ste vytvorili tabuľku zákazníkov a pridali nové pole úspešne ! " )

End Sub End Module

4

Upraviť tento riadok kódu a zadajte názov databázy programu Access .

( " Provider = microsoft.jet.oledb.4.0 ; Data Source = C : \\ CustomerData.mdb ; " )

spustite program stlačením tlačidla " F5 "
.

• Predchádzajúca strana: Ako získať prístup Počet záznamov v dotaze 
• Ďalšia strana: Ako používať Automatické číslo v jazyku Visual Basic