Definizione di un campo " contatore " nelle tabelle di database di Microsoft Access può aiutare a gestire i dati in futuro, quando hai bisogno di recuperarlo utilizzando query . Un campo " Contatore " viene incrementato automaticamente di uno per ogni nuova riga e non può essere cambiato . Questo campo si mantiene ogni riga univoco in una tabella di database . Normalmente un campo " contatore " partirà con il numero uno di default. Se si desidera avviare il campo con un anno come il 2000, è necessario eseguire un paio di domande prima di iniziare ad aggiungere i dati al vostro tavolo . Istruzioni
1
lancio di Microsoft Access , fare clic sulla scheda "Crea " e cliccare su " Tabella ". Clic sulla prima riga , sostituire "ID " a " YearColumn " e impostare il " Tipo di dati " come " Contatore . " Fare clic sulla riga successiva e digitare" TextField "per creare un secondo campo e premere " Invio ". Chiudi il tuo tavolo cliccando sulla" x " in alto a destra . Tipo " myYearTable " quando viene richiesto di dare il vostro tavolo un nome .
2 Fare clic sulla scheda "Database Tools " e cliccare su " Visual Basic " per lanciare il VB Editor. Fare clic su "Inserisci> Modulo " per aggiungere un nuovo modulo di codice
3
Aggiungere il seguente codice per creare una nuova procedura secondaria : .
CreateYearTable Private Sub ( )
4
Copia e incolla il seguente codice per creare una variabile per memorizzare l'istruzione SQL e l'altro per definire l' anno di inizio per la vostra tavola :
Dim strSQL Come StringDim startingYear As String
5
Copia e incolla il seguente codice per definire l' anno a partire da "2000" per il campo " contatore " ed eseguire un "INSERT INTO " ricerca:
startingYear = "2000" , strSQL = " INSERT INTO myYearTable ( YearColumn ) " strSQL = strSQL & "SELECT ' " & ( startingYear ) & " ' AS Expr1 " DoCmd.SetWarnings FalseDoCmd.RunSQL ( strSQL ) per
6
Aggiungere il seguente codice per rimuovere i dati che hai inserito nel passaggio precedente :
strSQL = " Elimina" strSQL = strSQL & "FROM myYearTable " strSQL = strSQL & " DOVE YearColumn = ' " & ( startingYear ) & " '; " DoCmd.SetWarnings FalseDoCmd.RunSQL ( strSQL ) MsgBox (" Fatto ! " ) economici 7
Press "F5" per eseguire la procedura e tornare a Microsoft Access. Fare doppio clic su " myYearTable " per aprire la tabella . Tipo " dati" sotto " Campo di testo " e premere " Invio " per visualizzare il primo anno " Contatore ", come " 2001 . " Inserire più testo nelle seguenti righe per incrementare l' anno di uno per ogni nuova riga .
< Br >
