Tener el conocimiento sobre cómo editar una columna con una restricción de clave primaria puede ahorrar tiempo cuando se trabaja con una base de datos Microsoft Access. Las filas de una tabla se identifican de forma única con una restricción de clave principal para la integridad de los datos . Access crea un índice único para permitir un rápido acceso a los datos en una tabla con una clave principal. Utilice Visual Basic para Aplicaciones ( VBA) en Access para automatizar procesos tales como la edición de una columna de clave principal. Instrucciones
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 .