Avviare Microsoft Office Access e selezionare " Database vuoto ", quindi fare clic su "Crea ". Selezionare il menu "Database Tools " poi su " Visual Basic ". Selezionare il menu "Inserisci" quindi su
2
digitare quanto segue per creare una nuova procedura di "Modulo ". :
Private Sub editPrimaryKey ( ) per
Press " Inserire "
3
digitare quanto segue per dichiarare le variabili che saranno utilizzati per creare una nuova tabella con una chiave primaria : .
Dim strSQL Come
String
Dim rst come Recordset
Dim dbs As Database
4
digitare quanto segue per definire il database da usare :
Set dbs = CurrentDb
5
digitare quanto segue per eseguire un'istruzione SQL e creare una tabella chiamata " dataTable " con una chiave primaria :
strSQL = " CREATE TABLE dataTable "
strSQL = strSQL & " ( PK_Field INTEGER VINCOLO PK_PK_Field PRIMARY KEY , "
strSQL = strSQL & "TESTO città ( 25 ) ) "
DoCmd.RunSQL ( strSQL ) economici 6
digitare quanto segue per aggiungere tre righe di dati nella nuova tabella :
strSQL = " INSERT INTO dataTable ( PK_Field [ ], [ città ]) "
strSQL = strSQL & " VALUES ( 1 , ' Fort Worth '); "
DoCmd.SetWarnings False
DoCmd.RunSQL ( strSQL ) per
strSQL =" INSERT INTO dataTable ( [ PK_Field ] , [città ] ) "
strSQL = strSQL & " VALUES ( 2 , ' Arlighton '); "
DoCmd.RunSQL ( strSQL ) per
strSQL =" INSERT INTO dataTable ( [ PK_Field ] , [città ] ) "
strSQL = strSQL & " VALUES ( 3 , 'Dallas '); "
DoCmd.RunSQL ( strSQL ) economici 7
digitare il comando seguente per rimuovere l'impostazione della chiave primaria dal campo " PK_Field " :
strSQL = " ALTER TABLE dataTable "
strSQL = strSQL & "DROP CONSTRAINT PK_PK_Field ; "
DoCmd.RunSQL ( strSQL ) per
Rimozione del vincolo di chiave primaria vi permetterà di modificare la colonna di chiave primaria .
8
digitare quanto segue per aprire la " dataTable " e modificare il tabella utilizzando un set di record :
Set rst = dbs.OpenRecordset ( " dataTable " )
rst.MoveFirst
rst.Edit
rst.Fields ( " PK_Field " ) . Valore = 6
rst.Update
rst.Close
il codice aggiorna la " PK_Field " a 6 per la prima riga . Premere il tasto " F5 " per eseguire la subroutine .
9
tornare alla finestra di Microsoft Access e fare clic con il tavolo " dataTable " che si trova nel riquadro sinistro dello schermo del computer . Selezionare " Visualizzazione Struttura " e fare clic sulla riga " PK_Field " . Fare clic sull'icona " chiave primaria " dal riquadro "Strumenti" per impostare questo campo di nuovo ad un campo di chiave primaria .
Programmazione © www.354353.com