1
Inicio Microsoft Office Access y seleccione "Base de datos en blanco " y luego haga clic en " Crear". Seleccione el menú " Herramientas de base de datos " y luego haga clic en " Visual Basic ". Seleccione el menú "Insertar " y luego haga clic
2
Escriba lo siguiente para crear un nuevo procedimiento de " módulos". :
Private Sub editPrimaryKey ()
Prensa " Escriba "
3
Escriba lo siguiente para declarar las variables que va a utilizar para crear una nueva tabla con una clave principal : .
strSQL As
secuencia < p> rst As Recordset
Dim dbs como base de datos
4
Escriba lo siguiente para definir la base de datos a utilizar :
Set dbs = CurrentDb
5
Escriba lo siguiente para ejecutar una sentencia SQL y crear una tabla llamada " dataTable " con una clave principal :
strSQL = " CREATE TABLE dataTable "
strSQL = strSQL y " ( PK_Field INTEGER RESTRICCIÓN PK_PK_Field PRIMARY KEY , "
strSQL = strSQL & " TEXTO ciudad ( 25 ) ) "
DoCmd.RunSQL ( strSQL )
6
escriba lo siguiente para agregar tres filas de datos a la nueva tabla :
strSQL = "INSERT INTO dataTable ( PK_Field [ ], [ ciudad ]) "
strSQL = strSQL & " VALUES ( 1 , ' Fort Worth '); "
DoCmd.SetWarnings False
DoCmd.RunSQL ( strSQL )
strSQL = " INSERT INTO dataTable ( [ PK_Field ] , [ la ciudad] ) "
strSQL = strSQL &" VALUES ( 2 , ' Arlighton '); "
DoCmd.RunSQL ( strSQL )
strSQL =" INSERT INTO dataTable ( [ PK_Field ] , [ ciudad] ) "
strSQL = strSQL &" VALUES ( 3 , ' Dallas '); "
DoCmd.RunSQL ( strSQL )
7
escriba lo siguiente para quitar la configuración de clave principal en el campo " PK_Field ":
strSQL = " ALTER TABLE dataTable "
strSQL = strSQL & " quitar la restricción PK_PK_Field ; "
< p > DoCmd.RunSQL ( strSQL )
Extracción de la restricción de clave principal le permitirá editar la columna de clave principal .
8
Escriba lo siguiente para abrir el " dataTable " y editar el tabla con un conjunto de registros :
Set rst = dbs.OpenRecordset ( " dataTable ")
rst.MoveFirst
rst.Edit
rst.Fields ( " PK_Field ") . Valor = 6 personas
rst.Update
rst.Close
el código se actualizará el " PK_Field " a 6 para la primera fila . Pulse la tecla "F5 " para ejecutar la subrutina.
9
volver a la ventana de Microsoft Access y haga clic en la tabla " dataTable " ubicado en el panel izquierdo de la pantalla del ordenador . Seleccione " Vista Diseño " y haga clic en la fila " PK_Field " . Haz clic en el icono de " clave principal " del panel " Herramientas" para definir este campo nuevo a un campo de clave principal .