Att veta hur man lägger till ett nytt fält i en Microsoft Office Access-databas tabell med Visual Basic.NET kan göra ditt program mer dynamiskt . Access är en relationsdatabas management system som ingår i Microsoft Office-paketet . VB.NET är ett objektorienterat dator programmeringsspråk ofta föredras av programmerare för dess användarvänlighet . I några steg du kan skriva VB.NET kod för att skapa en ny tabell , använd sedan " ALTER TABLE " uttalande att skapa ett nytt fält . Instruktioner
1
Öppna Microsoft Visual Basic Express och klicka på " Nytt projekt ... " i den vänstra rutan på skärmen . Dubbelklicka på " Console Application " i mitten rutan i " Nytt projekt " fönster .
2
Tryck " Ctrl " och " A ", tryck sedan på " Delete " för att radera all befintlig kod .
3
Kopiera och klistra in denna kod till din " Module1.vb " modul .
Import System.Data.OleDb
module Module1
Sub Main ( ) katalog
Dim MyConnection Som OleDbConnection
Dim myCommand Som OleDbCommand
Dim mySQLString As String
MyConnection = Ny OleDbConnection _
( " Provider = Microsoft.Jet.OLEDB.4.0 , Data Source = D : \\ Temp \\ myTextData.mdb , " ) katalog
myConnection.Open ( ) katalog
mySQLString = " CREATE tABELL cutomers ( FIRST_NAME TEXT , EFTERNAMN TEXT ) "
myCommand = Ny OleDbCommand ( mySQLString , MyConnection ) katalog
myCommand.ExecuteNonQuery ( ) katalog
mySQLString = " INSERT INTO cutomers VALUES ( ' JOHN ' , ' SMITH ' ) "
myCommand = Ny OleDbCommand ( mySQLString , MyConnection ) katalog
myCommand.ExecuteNonQuery ( ) katalog
mySQLString = " INSERT INTO cutomers VALUES ( ' JOHN ' , ' SMITH ' ) "
myCommand = Ny OleDbCommand ( mySQLString , MyConnection ) katalog
myCommand.ExecuteNonQuery ( ) katalog
mySQLString = " ALTER TABLE cutomers ADD KÖN TEXT ; "
myCommand = ny OleDbCommand ( mySQLString , MyConnection ) katalog
myCommand.ExecuteNonQuery ( ) katalog
MsgBox ( " Du har skapat tabellen Kunder och lagt ett nytt fält med framgång ! " )
End Sub
ändmodul
4
Redigera denna kodrad och skriv namnet på din Access-databas .
( " Provider = Microsoft.Jet.OLEDB.4.0 , Data Source = C : . \\ CustomerData.mdb ; " ) katalog
Kör ditt program genom att trycka på " F5 " Addera
