Å vite hvordan du programmatisk opprette en tabell og deretter legge til en auto antall felt ved hjelp av Visual Basic for Applications ( VBA ) kan du spare tid når du arbeider med Microsoft Office Access . Access er en relasjonsdatabase styringssystem inkludert i Microsoft Office-pakken. VBA er et programmeringsspråk som brukes i Microsoft Office-programmer til å automatisere manuelle prosesser som skaper tabeller . I noen få trinn kan du skrive VBA -kode for å opprette en tabell , legge til data i den og legge en auto antall felt til det. Instruksjoner
en
Åpne Microsoft Office Access 2007 og klikk "Blank Database ", velg deretter "Create ". Klikk på " Database Verktøy ", velg deretter " Visual Basic " for å åpne Microsoft Visual Basic Window . Velg " Insert" -feltet og klikk
2
Kopier og lim inn følgende kode i modulen " Module ". : En
Private Sub createAutoNumberField ( )
Set dBS = Application.CurrentDb
sQLString = "CREATE TABLE InstrumentInfo ( Instrument TEKST, løpenummer TEKST )"
DoCmd.SetWarnings False
DoCmd.RunSQL ( sQLString )
strsql = " INSERT INTO InstrumentInfo VERDIER ( MXA ' , '83456 ' )"
DoCmd.RunSQL ( strsql )
strsql = " INSERT INTO InstrumentInfo VALUES (' Signal Generator ' , '1244532 ' ) "
DoCmd.RunSQL ( strsql )
Sett tblDef = dbs.TableDefs ( " InstrumentInfo ")
Sett autoField = tblDef.CreateField ( " AutoColumn " , dbLong )
p Med autoField
. attributter = dbAutoIncrField
End With
p Med tblDef.Fields
. Append autoField
. Refresh
End With
End Sub
3
Kjør subrutinen ved å trykke " F5 ".