Propriedade AllowAdditions

Importante :  Este artigo foi traduzido por um sistema de tradução automática, leia o aviso de isenção de responsabilidade. Para sua referência, veja a versão em inglês deste artigo aqui.

Aplicável a

Objeto de formulário

Você pode usar a propriedade AllowAdditions para especificar se um usuário pode adicionar um registro ao usar um form. Leitura/gravação booliano.

expressão. AllowAdditions

expressão Necessário. Uma expressão que retorna um dos objetos na lista Aplica-se a.

Configuração

A propriedade AllowAdditions utiliza as configurações a seguir.

Configuração

Visual Basic

Descrição

Sim

True

(Padrão) O usuário pode adicionar novos registros.

Não

Falso

O usuário não pode adicionar novos registros.


Você pode definir a propriedade AllowAdditions usando property sheet do formulário, uma macro ou Visual Basic para código de Applications (VBA).

Comentários

Defina a propriedade AllowAdditions para não permitir que os usuários visualizem ou editar os registros existentes, mas não adicionar novos registros.

Se você quiser impedir alterações nos registros existentes (tornar um formulário somente leitura), definir a AllowAdditions, PermitirExclusõese propriedades de AllowEdits como não. Você também pode tornar os registros somente leitura definindo a propriedade RecordsetType como instantâneo.

Se você quiser abrir um formulário para entrada de dados apenas, defina a propriedade do formulário DataEntry como Sim.

Quando a propriedade AllowAdditions estiver definida como não, o comando de Novo registro em registrosna guia dados não está disponível.

Observação : Quando o argumento Modo de dados da ação AbrirFormulário é usado, Microsoft Office Access 2007 substituirá um número de configurações de propriedades do formulário. Se o argumento Modo de dados da ação AbrirFormulário estiver definido para Editar, o Access abrirá o formulário com as seguintes configurações de propriedade:

  • AllowEdits — Sim

  • PermitirExclusões — Sim

  • AllowAdditions — Sim

  • DataEntry — não

Para impedir que a ação AbrirFormulário substitua qualquer uma dessas configurações de propriedade existente, omita a configuração do argumento Modo de dados para que o Access usará as configurações de propriedade definidas pelo formulário.

Exemplo

O exemplo a seguir examina a propriedade ControlType para todos os controles em um formulário. Para cada controle de caixa de rótulo e texto, o procedimento alterna a propriedade SpecialEffect desses controles. Quando os controles de rótulo SpecialEffect está definida como sombreado e propriedade de aparência dos controles de caixa de texto está definida como Normal e o AllowAdditions, PermitirExclusõese AllowEdits propriedades estão todas definidas como True, a variável intCanEdit é alternada para permitir 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

Observação : Aviso de Isenção de Tradução Automática: Este artigo foi traduzido por computador, sem intervenção humana. A Microsoft oferece essas traduções automáticas para ajudar as pessoas que não falam inglês a aproveitar os textos escritos sobre produtos, serviços e tecnologias da Microsoft. Como este artigo foi traduzido automaticamente, é possível que contenha erros de vocabulário, sintaxe ou gramática.

Expanda suas habilidades
Explore o treinamento
Obtenha novos recursos primeiro
Ingressar no Office Insider

Essas informações foram úteis?

Obrigado por seus comentários!

Agradecemos pelos seus comentários! Parece que pode ser útil conectar você a um de nossos agentes de suporte do Office.

×