Declaração final
Encerra a execução imediatamente.
Sintaxe
End
Observações
Você pode colocar a End
instrução em qualquer lugar em um procedimento para forçar todo o aplicativo a parar de ser executado. End
fecha todos os arquivos abertos com uma Open
instrução e limpa todas as variáveis do aplicativo. O aplicativo fecha assim que não há outros programas contendo referências a seus objetos e nenhum de seu código está em execução.
Nota
A End
instrução interrompe a execução de código abruptamente e não invoca o Dispose
método or Finalize
ou qualquer outro código do Visual Basic. As referências de objetos mantidas por outros programas são invalidadas. Se uma End
instrução for encontrada dentro de um Catch
Try
ou bloco, o controle não passará para o bloco correspondenteFinally
.
A Stop
instrução suspende a execução, mas, ao contrário End
do , não fecha nenhum arquivo ou limpa nenhuma variável, a menos que seja encontrada em um arquivo executável compilado (.exe).
Como End
encerra seu aplicativo sem atender a quaisquer recursos que possam estar abertos, você deve tentar fechá-lo corretamente antes de usá-lo. Por exemplo, se o seu pedido tiver formulários abertos, deve fechá-los antes de o controlo chegar à End
declaração.
Deve utilizar End
com moderação e apenas quando precisar de parar imediatamente. As maneiras normais de encerrar um procedimento (Declaração de Retorno e Declaração de Saída) não apenas fecham o procedimento corretamente, mas também dão ao código de chamada a oportunidade de fechar corretamente. Um aplicativo de console, por exemplo, pode simplesmente Return
a partir do Main
procedimento.
Importante
A End
instrução chama o ExitEnvironment método da classe no System namespace. Exit requer que você tenha UnmanagedCode
permissão. Se não o fizer, ocorrerá um SecurityException erro.
Quando seguida por uma palavra-chave adicional, End <keyword> Statement delineia o final da definição do procedimento ou bloco apropriado. Por exemplo, End Function
encerra a definição de um Function
procedimento.
Exemplo
O exemplo a seguir usa a instrução para encerrar a End
execução de código se o usuário solicitar.
Sub Form_Load()
Dim answer As MsgBoxResult
answer = MsgBox("Do you want to quit now?", MsgBoxStyle.YesNo)
If answer = MsgBoxResult.Yes Then
MsgBox("Terminating program")
End
End If
End Sub
Notas do desenvolvedor de dispositivos inteligentes
Esta declaração não é suportada.