Propriedade PermitirEdições

Aplica-se a

Pode utilizar a propriedade PermitirEdições para especificar se um utilizador pode editar registos guardados ao utilizar um formulário. Booleano de leitura/escrita.

expressão.PermitirEdições

expressão Obrigatório. Uma expressão que devolve um dos objetos na lista Aplica-se A.

Definição

A propriedade PermitirEdições utiliza as seguintes definições.

Pode definir a propriedade PermitirEdições ao utilizar uma folha de propriedades, uma macro ou um código VBA (Visual Basic for Applications) de um formulário.

Observações

Pode utilizar a propriedade PermitirEdições para impedir alterações a dados existentes apresentados por um formulário. Se quiser impedir alterações a dados num controlo específico, utilize a propriedade Ativado ou Protegido.

Se quiser impedir alterações aos registos existentes (atribuir o estado só de leitura a um formulário), defina as propriedades PermitirAdições, PermitirEliminações e PermitirEdições como Não. Também pode atribuir o estado só de leitura a registos ao definir a propriedade TipoDoConjuntoDeRegistos como Instantâneo.

Alterar um valor de campo programaticamente faz com que o registo atual seja editável, independentemente da definição da propriedade AllowEdits . Se quiser impedir que o utilizador faça alterações a um registo (AllowEdits é Não) que precisa de editar programaticamente, guarde o registo após quaisquer alterações programáticas; A definição da propriedade AllowEdits será novamente honrada após quaisquer alterações não guardadas ao registo atual serem guardadas.

• PermitirEdições – Sim

• PermitirEliminações – Sim

• PermitirAdições – Sim

• IntroduçãoDeDados – Não

Para impedir que a ação AbrirFormulário substitua alguma das definições de propriedade existentes, omita o argumento Modo de Dados para que o Access utilize as definições de propriedade definidas pelo formulário.

Exemplo

O exemplo seguinte examina a propriedade ControlType de todos os controlos num formulário. Para cada controlo de caixa de texto e etiqueta, o procedimento ativa/desativa a propriedade EfeitoEspecial desses controlos. Quando a propriedade EfeitoEspecial do controlo de etiqueta está definida como Sombreado, a propriedade EfeitoEspecial do controlo de caixa de texto está definida como Normal e as propriedades PermitirAdições, PermitirEliminações e PermitirEdições estão definidas como True, a variável intCanEdit é ativada para permitir a edição dos dados subjacentes.

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