Sapere come creare una tabella e quindi aggiungere un campo numero di auto utilizzando Visual Basic, Applications Edition (VBA ), è possibile risparmiare tempo quando si lavora con Microsoft Office Access . Access è un sistema di gestione di database relazionale incluso nella suite Microsoft Office . VBA è un linguaggio di programmazione utilizzato in applicazioni di Microsoft Office per automatizzare i processi manuali , come la creazione di tabelle . In pochi passi è possibile scrivere codice VBA per creare una tabella , aggiungere i dati ad esso e aggiungere un campo numero di auto per esso . Istruzioni
1
Aprire Microsoft Office Access 2007 e fare clic su " Database vuoto ", quindi selezionare "Crea ". Fare clic su " Strumenti di database ", quindi selezionare " Visual Basic " per aprire la finestra di Microsoft Visual Basic . Selezionare il campo "Inserisci" e fare clic su
2
Copia e incolla il seguente codice nel modulo "Modulo ". :
Private Sub createAutoNumberField ( ) per
dbs = Application.CurrentDb
sqlstring = " CREATE TABLE InstrumentInfo (strumento TESTO , SerialNumber TESTO ) "
DoCmd.SetWarnings False
DoCmd.RunSQL ( SqlString ) per
strSQL = "INSERT INTO InstrumentInfo ( ' MXA ' , '83456 ') "
DoCmd.RunSQL ( strSQL ) per
strSQL = " INSERT INTO InstrumentInfo ( ' Signal Generator ' , '1244532 ') "
DoCmd.RunSQL ( strSQL ) per
tblDef = dbs.TableDefs ( " InstrumentInfo " ) per
AutoField = tblDef.CreateField ( " AutoColumn " , dbLong ) per
AutoField
. Attributi = dbAutoIncrField
End With
tblDef.Fields
. Append AutoField
. Refresh
End With End Sub
3
eseguire la subroutine con il tasto " F5 ".
< br >