Come faccio a creare campi di incremento automatico in Visual Basic per Access

? Sapere come creare un campo autoincrement in una tabella di Access utilizzando Visual Basic, Applications Edition , o VBA , in grado di rendere l'applicazione più dinamico . Un campo autoincrement è un campo in una tabella che viene incrementato automaticamente per ogni nuovo record . Microsoft Office Access è un sistema di gestione di database relazionale utilizzato per i database più piccoli . VBA è un linguaggio di programmazione sviluppato da Microsoft ed è utilizzato per automatizzare le attività di routine in applicazioni Microsoft Office. Istruzioni
1

Avviare Microsoft Office Access 2007 e selezionare " Database vuoto ", quindi fare clic su "Crea ". Fare clic su " Strumenti di database ", quindi selezionare " Visual Basic ".
2

Fare clic sul campo di inserimento e selezionare " Modulo ".
3

Copia e incolla il seguente codice nel modulo :

private Sub autoIncrementField ( ) per

Set dbs = Application.CurrentDb

tblDef = dbs.TableDefs ( " addressTbl " ) per

Set Newfield = tblDef.CreateField ( " AutoField " , dbLong ) per

Newfield

. Attributi = dbAutoIncrField

End With

tblDef . campi

. Append Newfield

. Refresh