Evento TextBox.Undo (Access)TextBox.Undo event (Access)

Ocorre quando o usuário desfaz uma alteração.Occurs when the user undoes a change.

SintaxeSyntax

expression.expression. Undo( _Cancel_, )

expression Uma variável que representa um objeto TextBox.expression A variable that represents a TextBox object.

ParâmetrosParameters

NomeName Obrigatório/OpcionalRequired/Optional Tipo de dadosData type DescriçãoDescription
CancelCancel ObrigatórioRequired IntegerInteger Defina este argumento como True para cancelar a operação de desfazer e deixar o controle ou formulário em seu estado editado.Set this argument to True to cancel the undo operation and leave the control or form in its edited state.

ComentáriosRemarks

O evento Undo em controles ocorre sempre que o usuário retorna um controle ao seu estado original, clicando no botão de Campo/registro de desfazer na barra de comandos, clicando no botão Desfazer , pressionando a tecla ESC ou chamando o método Undo do controle especificado.The Undo event for controls occurs whenever the user returns a control to its original state by clicking the Undo Field/Record button on the command bar, clicking the Undo button, pressing the ESC key, or calling the Undo method of the specified control. O controle precisa ter o foco em todos os três casos.The control needs to have focus in all three cases. O evento não ocorrerá se o usuário clicar no botão Desfazer digitação na barra de comandos.The event does not occur if the user clicks the Undo Typing button on the command bar.

ExemploExample

O exemplo a seguir demonstra a sintaxe de uma sub-rotina que intercepta o evento Undo de um formulário.The following example demonstrates the syntax for a subroutine that traps the Undo event for a form.

Private Sub Form_Undo(Cancel As Integer) 
 Dim intResponse As Integer 
 Dim strPrompt As String 
 
 strPrompt = "Cancel the undo operation?" 
 
 intResponse = MsgBox(strPrompt, vbYesNo) 
 
 If intResponse = vbYes Then 
 Cancel = True 
 Else 
 Cancel = False 
 End If 
End Sub

Confira tambémSee also

Objeto TextBoxTextBox Object