Å vite hvordan du legger til et nytt felt i en Microsoft Office Access database tabellen bruker Visual Basic.NET kan gjøre programmet mer dynamisk . Access er en relasjonsdatabase styringssystem inkludert i Microsoft Office-pakken. VB.NET er et objektorientert programmeringsspråk ofte foretrukket av programmerere for sin brukervennlighet . I noen få trinn kan du skrive VB.NET kode for å lage en ny tabell , og deretter bruke " ALTER TABLE " statement å opprette et nytt felt . Instruksjoner
en
Åpne Microsoft Visual Basic Express og klikk "New Project ... " på den venstre ruten på skjermen. Dobbeltklikk på " Console Application " i den midterste ruten av "New Project " Window .
2
Trykk " Ctrl" og "A ", klikk deretter "Slett " for å slette all eksisterende kode .
3
Kopier og lim inn denne koden til din " Module1.vb " modulen.
Import System.Data.OleDb
module Module1
< p> Sub Main ( )
Dim myConnection Som OleDbConnection
Dim myCommand Som OleDbCommand
Dim mySQLString As String
myConnection = Ny OleDbConnection _
( " Provider = Microsoft.Jet.OLEDB.4.0 ; datakilde = D: \\ Temp \\ myTextData.mdb ; " )
myConnection.Open ( )
mySQLString = "CREATE TABELL cutomers ( FIRST_NAME TEKST, LAST_NAME TEKST ) "
myCommand = Ny OleDbCommand ( mySQLString , myConnection )
myCommand.ExecuteNonQuery ( )
mySQLString =" INSERT INTO cutomers VALUES ( ' JOHN ', ' SMITH ' ) "
myCommand = Ny OleDbCommand ( mySQLString , myConnection )
myCommand.ExecuteNonQuery ( )
mySQLString =" INSERT INTO cutomers VALUES (' JOHN ',' SMITH ' ) "
myCommand = Ny OleDbCommand ( mySQLString , myConnection )
myCommand.ExecuteNonQuery ( )
mySQLString =" ALTER TABLE cutomers ADD KJØNN TEKST ; "
myCommand = Ny OleDbCommand ( mySQLString , myConnection )
myCommand.ExecuteNonQuery ( )
MsgBox (" Du skapte kundene tabellen og lagt et nytt felt med hell ! ")
End Sub
End Module
4
Rediger denne linjen med kode og skriv inn navnet på Access-databasen .
( " Provider = Microsoft.Jet.OLEDB.4.0 ; datakilde = C: . \\ CustomerData.mdb ; " )
Kjør programmet ved å trykke" F5 "
