Propiedad Form. AllowAdditions (Access)Form.AllowAdditions property (Access)

Puede usar la propiedad AllowAdditions para especificar si un usuario puede agregar un registro cuando esté usando un formulario.You can use the AllowAdditions property to specify whether a user can add a record when using a form. Boolean de lectura y escritura.Read/write Boolean.

SintaxisSyntax

expresión. AllowAdditionsexpression.AllowAdditions

expresión Variable que representa un objeto Form.expression A variable that represents a Form object.

ObservacionesRemarks

Establezca la propiedad AllowAdditions a No para permitir que los usuarios vean o modifiquen los registros existentes aunque no puedan agregar registros.Set the AllowAdditions property to No to allow users to view or edit existing records but not add new records.

Si desea evitar los cambios en los registros existentes (hacer un formulario de sólo lectura), establezca las propiedades AllowAdditions, AllowDeletions y AllowEdits en no.If you want to prevent changes to existing records (make a form read-only), set the AllowAdditions, AllowDeletions, and AllowEdits properties to No. También puede hacer los registros de sólo lectura estableciendo la propiedad RecordsetType a Snapshot.You can also make records read-only by setting the RecordsetType property to Snapshot.

Si desea abrir un formulario de entrada de datos sólo, establecer la propiedad DataEntry del formulario en Sí.If you want to open a form for data entry only, set the form's DataEntry property to Yes.

Cuando la propiedad AllowAdditions se establece en No, el comando Entrada de datos en el menú registros no está disponible.When the AllowAdditions property is set to No, the Data Entry command on the Records menu isn't available.

Nota

Cuando se usa el argumento del modo de la acción AbrirFormulario, Microsoft Access anula un número de valores de propiedades del formulario.When the DataMode argument of the OpenForm action is used, Microsoft Access will override a number of form property settings. Si el argumento de modo de la acción AbrirFormulario está establecido en editar, Access abrirá el formulario con los siguientes valores de propiedad:If the DataMode argument of the OpenForm action is set to Edit, Access will open the form with the following property settings:

  • PermitirEdiciones -síAllowEdits - Yes
  • AllowDeletions -síAllowDeletions - Yes
  • AllowAdditions -síAllowAdditions - Yes
  • DataEntry -noDataEntry - No

EjemploExample

En el siguiente ejemplo se examina la propiedad ControlType para todos los controles de un formulario.The following example examines the ControlType property for all controls on a form. Para cada control de cuadro de texto y etiqueta, el procedimiento alterna la propiedad SpecialEffect para esos controles.For each label and text box control, the procedure toggles the SpecialEffect property for those controls. Cuando la propiedad SpecialEffect de los controles Label está establecida en sombreado, y la propiedad SpecialEffect de los controles de cuadro de texto está establecida en normal, y las propiedades AllowAdditions, AllowDeletionsy AllowEdits son todas Si se **** establece en true intCanEdit , la variable se alterna para permitir la edición de los datos subyacentes.When the label controls' SpecialEffect property is set to Shadowed, and the text box controls' SpecialEffect property is set to Normal, and the AllowAdditions, AllowDeletions, and AllowEdits properties are all set to True, the intCanEdit variable is toggled to allow editing of the underlying data.

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

Soporte técnico y comentariosSupport and feedback

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación?Have questions or feedback about Office VBA or this documentation? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.