Compartilhar via


Evento Form.AfterInsert (Access)

O evento AfterInsert ocorre após um novo registro for adicionado.

Sintaxe

expressão. AfterInsert

expressão Uma variável que representa um objeto Form.

Valor de retorno

Nada

Comentários

Observação

[!OBSERVAçãO] Definir o valor de um controle por meio de uma macro ou do Visual Basic não dispara esses eventos.

Utilize um procedimento de evento ou macro AfterInsert para repetir um conjunto de registos sempre que for adicionado um novo registo.

Para executar um macro ou procedimento de evento quando o evento AfterInsert ocorrer, defina a propriedade OnAfterInsert com o nome da macro ou como [procedimento do evento].

Exemplo

Este exemplo mostra como pode utilizar um procedimento de evento BeforeInsert para verificar se o utilizador quer criar um novo registo e um procedimento de evento AfterInsert para repetir a origem de registos do formulário Funcionários após a adição de um registo.

Para experimentar o exemplo, adicione o seguinte procedimento de evento a um formulário denominado Funcionários baseado numa tabela ou consulta. Alterne para o modo de folha de dados de formulário e tente inserir um registro.

Private Sub Form_BeforeInsert(Cancel As Integer) 
 If MsgBox("Insert new record here?", _ 
 vbOKCancel) = vbCancel Then 
 Cancel = True 
 End If 
End Sub 
 
Private Sub Form_AfterInsert() 
 Forms!Employees.Requery 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.