Se aplica a
Objeto Form |
Puede usar la propiedad AllowAdditions para especificar si un usuario puede agregar un registro cuando use un formulario. Valor Boolean de lectura y escritura.
expression.AllowAdditions
expresión Requerido. Una expresión que devuelve uno de los objetos de la lista Se aplica a.
Configuración
En la propiedad AllowAdditions se usan los valores siguientes.
Configuración |
Visual Basic |
Descripción |
Sí |
True |
(Valor predeterminado) El usuario puede agregar nuevos registros. |
No |
False |
El usuario no puede agregar nuevos registros. |
Puede establecer la propiedad AllowAdditions mediante la hoja de propiedades del formulario, una macro o código de Visual Basic para Aplicaciones (VBA).
Observaciones
Establezca la propiedad AllowAdditions en No para permitir a los usuarios ver o editar registros existentes pero no agregar nuevos registros.
Si quiere evitar cambios en los registros existentes (hacer que un formulario sea de solo lectura), establezca las propiedades AllowAdditions, AllowDeletions y AllowEdits en No. También puede crear registros de solo lectura estableciendo la prioridad RecordsetType en Instantánea.
Si quiere abrir un formulario solo para entrada de datos, establezca la propiedad DataEntry en Sí.
Cuando la propiedad AllowAdditions se establece en No, el comando Nuevo registro en Registros en la pestaña Datos no está disponible.
Nota: Cuando se usa el argumento de modo de datos de la acción OpenForm, Microsoft Office Access 2007 invalidará varios valores de propiedad del formulario. Si el argumento de modo de datos de la acción OpenForm se establece en Edit, Access abrirá el formulario con los valores de propiedad siguientes:
-
AllowEdits: sí
-
AllowDeletions: sí
-
AllowAdditions: sí
-
DataEntry: no
Para evitar que la acción OpenForm invalide alguno de los valores de propiedad existentes, omita el valor del argumento de modo de datos para que Access use los valores de propiedad definidos por el formulario.
Ejemplo
En el ejemplo siguiente se examina la propiedad ControlType para todos los controles de formulario. Por cada control de cuadro de texto y de etiqueta, el procedimiento alterna la propiedad SpecialEffect de esos controles. Cuando la propiedad SpecialEffect de los controles de etiqueta se establece en Shadowed, la propiedad SpecialEffect de los controles de cuadro de texto se establece en Normal y las propiedades AllowAdditions, AllowDeletions y AllowEdits se establecen todas en True, la variable intCanEdit cambia para permitir la edición de los datos subyacentes.
Sub ToggleControl(frm As Form)
Dim ctl As Control
Dim intI As Integer, intCanEdit As Integer
Const conTransparent = 0
Const conWhite = 16777215
For Each ctl in frm.Controls
With ctl
Select Case .ControlType
Case acLabel
If .SpecialEffect = acEffectShadow Then
.SpecialEffect = acEffectNormal
.BorderStyle = conTransparent
intCanEdit = True
Else
.SpecialEffect = acEffectShadow
intCanEdit = False
End If
Case acTextBox
If .SpecialEffect = acEffectNormal Then
.SpecialEffect = acEffectSunken
.BackColor = conWhite
Else
.SpecialEffect = acEffectNormal
.BackColor = frm.Detail.BackColor
End If
End Select
End With
Next ctl
If intCanEdit = IFalse Then
With frm
.AllowAdditions = False
.AllowDeletions = False
.AllowEdits = False
End With
Else
With frm
.AllowAdditions = True
.AllowDeletions = True
.AllowEdits = True
End With
End If
End Sub