Propiedad Form.AllowDeletions (Access)
Use la propiedad AllowDeletions para especificar si un usuario puede eliminar un registro al usar un formulario. Boolean de lectura y escritura.
Sintaxis
expresión. AllowDeletions
expresión Variable que representa un objeto Form.
Comentarios
Puede establecer esta propiedad a No para permitir que los usuarios vean y modifiquen los registros existentes, pero no los eliminen. Cuando AllowDeletions se establece en Sí, los registros se pueden eliminar siempre y cuando no se rompa la regla de integridad referencial existente.
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. También puede hacer los registros de sólo lectura estableciendo la propiedad RecordsetType a Snapshot.
Cuando la propiedad AllowDeletions está establecida a No, no está disponible el comando Eliminar registro en el menú Edición.
Nota:
Cuando se establece el argumento DataMode de la acción OpenForm, Microsoft Access invalidará una serie de valores de propiedad de formulario. Si el argumento DataMode de la acción AbrirFormulario está establecido en Editar, Access abrirá el formulario con la siguiente configuración de propiedad:
- AllowEdits : sí
- AllowDeletions : sí
- AllowAdditions : sí
- DataEntry : no
Para evitar que la acción OpenForm invalide cualquiera de estos valores de propiedad existentes, omita la configuración del argumento DataMode para que Access use la configuración de propiedad definida por el formulario.
Ejemplo:
En el siguiente ejemplo se examina la propiedad ControlType para todos los controles de un formulario. Para cada control de cuadro de texto y etiqueta, el procedimiento alterna la propiedad SpecialEffect para esos controles. Cuando la propiedad SpecialEffect de los controles de etiqueta se establece en Sombreado y la propiedad SpecialEffect de los controles de cuadro de texto se establece en Normal y las propiedades AllowAdditions, AllowDeletions y AllowEdits se establecen en True, la intCanEdit
variable se alterna 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
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? 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.