Vide, hvordan man tilføje et nyt felt til en Microsoft Office Access -database tabellen ved hjælp af Visual Basic.NET kan gøre dit program mere dynamisk. Access er en relationel database management system inkluderet i Microsoft Office-pakken. VB.NET er et objekt -orienteret programmering sprog ofte foretrækkes af programmører for sin brugervenlighed . I et par trin, du kan skrive VB.NET kode til at oprette en ny tabel , og derefter bruge " ALTER TABLE " erklæring for at oprette et nyt felt . Instruktioner
1
Åbn Microsoft Visual Basic Express og klik på " Nyt projekt ... " på den venstre rude på skærmen. Dobbeltklik på " Console Application " i den midterste rude i " Nyt projekt " Window .
2
Tryk på " Ctrl" og "A ", tryk derefter på "Slet " for at slette alle eksisterende kode. < br >
3
Kopier og indsæt denne kode til din " Module1.vb "-modulet .
Import System.Data.OleDb
Module Module1
< p> Sub Main ( )
Dim MinForbindelse Som OleDbConnection
Dim myCommand Som OleDbCommand
Dim mySQLString As String
MinForbindelse = Ny OleDbConnection _
( " Provider = Microsoft.Jet.OLEDB.4.0 ; datakilde = D: \\ Temp \\ myTextData.mdb ," )
myConnection.Open ()
mySQLString = " CREATE TABEL cutomers ( FIRST_NAME TEKST , LAST_NAME TEXT) "
myCommand = Ny OleDbCommand ( mySQLString , MinForbindelse )
myCommand.ExecuteNonQuery ()
mySQLString =" INSERT INTO cutomers VALUES ( ' John' , ' SMITH ' ) "
myCommand = Ny OleDbCommand ( mySQLString , MinForbindelse )
myCommand.ExecuteNonQuery ()
mySQLString =" INSERT INTO cutomers VALUES ( ' JOHN ',' SMITH ' ) "
myCommand = Ny OleDbCommand ( mySQLString , MinForbindelse )
myCommand.ExecuteNonQuery ()
mySQLString =" ALTER TABLE cutomers ADD KØN tekst; "
myCommand = Ny OleDbCommand ( mySQLString , MinForbindelse )
myCommand.ExecuteNonQuery ()
MsgBox ( " Du har oprettet tabellen Kunder og tilføjet et nyt felt med succes ! ")
End Sub
End Module
4
Rediger denne linje kode , og skriv navnet på din Access-database .
( " Provider = Microsoft.Jet.OLEDB.4.0 ; datakilde = C: . \\ CustomerData.mdb , " )
Styr dit program ved at trykke på" F5 "