Att veta hur programmatiskt för att skapa en tabell och sedan lägga till ett fält auto nummer med hjälp av Visual Basic for Applications ( VBA ) kan du spara tid när du arbetar med Microsoft Office Access . Access är en relationsdatabas som ingår i Microsoft Office-paketet. VBA är en dator programmeringsspråk som används i Microsoft Office-program för att automatisera manuella processer som att skapa tabeller . I några få steg kan du skriva VBA- kod för att skapa en tabell , lägga till data i den och lägga ett fält auto nummer till den .
1 .
Öppna Microsoft Office Access 2007 och klicka på " tom databas , " välj sedan " Skapa ". Klicka på " Databasverktyg "och välj sedan "Visual Basic "för att öppna Microsoft Visual Basic -fönstret. Välj " Infoga "-fältet och klicka på " . Modul "
2
Kopiera och klistra in följande kod i modulen :
Private Sub createAutoNumberField ( )
Set DBS=Application. CurrentDb
sQLString=" CREATE TABLE InstrumentInfo (instrumentet TEXT , serialNumber text) "
DoCmd . SetWarnings Falska
DoCmd. RunSQL ( sQLString )
strSQL=" INSERT INTO InstrumentInfo VALUES ( ' MXA " , ' ) "
DoCmd. RunSQL ( strSQL )
strSQL=" INSERT INTO InstrumentInfo VALUES ( ' Signal Generator " , ' ) "
DoCmd. RunSQL ( strSQL )
Set tblDef=dbs. TableDefs ( " InstrumentInfo " )
Set autoField=tblDef . CreateField ( " AutoColumn " , dbLong )
Med autoField
. Attribut=dbAutoIncrField
End With
Med tblDef. Fields
. Lägg autoField
. Uppdatera
End With
End Sub
3 .
Kör subrutin av trycka på " F5 ".
Previous:nothing Next:hur du återställer spool filer