XL2000: Ramos para outras secções de código com Ir para e de chamada

Traduções de Artigos Traduções de Artigos
Artigo: 213486 - Ver produtos para os quais este artigo se aplica.
Este artigo foi arquivado. Este artigo é oferecido "tal como está" e deixará de ser actualizado.
Expandir tudo | Reduzir tudo

Nesta página

Sumário

No Microsoft Excel versões 5.0 e posteriores, pode utilizar as instruções GoTo e chamadas para sucursais para outras secções de um Microsoft Visual Basic para aplicações do procedimento.

Nota : em versões anteriores do Excel, pode fazer isto com as funções GOTO() e RUN().

Mais Informação

Microsoft fornece exemplos de programação ilustração só, sem garantia expressa ou implícita, incluindo, sem limitação, garantias implícitas de comercialização e/ou adequação a um fim específico. Este artigo pressupõe que está familiarizado com a linguagem de programação apresentada e as ferramentas utilizadas para criar e depurar procedimentos. Profissionais de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas não modificarão estes exemplos para proporcionarem funcionalidades adicionais nem criarão procedimentos adaptados às necessidades específicas.
Se dispõe de limitada experiência de programação, poderá contactar um Microsoft Certified Partner ou a serviços de aviso. Para obter mais informações, visite estes Web sites da Microsoft:

Microsoft certificado Partner - https://partner.microsoft.com/global/30000104

Serviços Microsoft aviso - http://support.microsoft.com/gp/advisoryservice

Para obter mais informações sobre as opções de suporte estão disponíveis e sobre como contactar a Microsoft, visite o seguinte Web site da Microsoft: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS

Ir para

A instrução GoTo salta para e executa as instruções o rótulo de linha específica e continua a executá-las até o fim do programa é atingido.

Chamada

A instrução Call executa um procedimento e devolve para a linha imediatamente após a instrução chamar o procedimento de origem. A instrução Call também pode passar argumentos de qualquer tipo de dados declarada para o procedimento chamado e pode transferir o controlo para uma sub procedimento, função procedimento, procedimento de biblioteca de ligação dinâmica (DLL) ou procedimento de recurso de código Macintosh.

Os exemplos seguintes demonstram como utilizar Ir para e a chamada .

Exemplo 1: A diferença entre a chamada e ir para

O procedimento do Visual Basic que se segue demonstra a diferença entre utilizar a instrução de Ir para e a declaração de chamada :
Sub One()
    MsgBox ("One()")       ' Displays message box.

    ' Sends control to Line10 below.
    ' The GoTo Line10 statement directs the program to branch to the
    ' line labeled "Line10:", the message box "unexecuted code" is
    ' skipped.
    GoTo Line10

    ' This message box is not displayed.
    MsgBox ("unexecuted code")

Line10:

    ' Displays message box.
    MsgBox ("Line10 of One()")

    ' The "Call Two()" line executes the subroutine defined as "Two()",
    ' sends a message box indicating that the subprocedure is executing,
    ' then returns to Sub One executing the line immediately after the

    ' Call statement.
    ' Call made to Sub procedure named two()
    Call Two

    ' Message box displayed.
    MsgBox ("back to One(); returning from Two()")

End Sub

Sub Two()
    ' Message box displayed.
    MsgBox ("Two()")
End Sub
				
Nota : O exemplo anterior acima não passa quaisquer argumentos.

Exemplo 2: Uma alternativa à instrução de chamada

O seguinte código de Visual Basic efectua uma chamada para um procedimento sub noutro sem utilizar a instrução de chamada :
Sub One()
    MsgBox ("One()")              ' Message box displayed.
    two                           ' Call made to Sub named two().
    MsgBox ("return from Two()")  ' Message box displayed.
End Sub

Sub Two()
    MsgBox ("Two()")              ' Message box displayed.
End Sub
				

Exemplo 3: Utilizar GoTo para ramos condicional

O seguinte código mostra como pode combinar o se... Then... Else instrução com a instrução GoTo para fornecer mais opções de ramos ou para criar a possibilidade de voltar a uma localização específica depois da instrução GoTo é executada:
Sub GetInput()

    Dim number as Integer ' Used for input variable.

    ' User input requested. Val() to turn input text into a number.
    number = Val(InputBox("Enter a 1 or a 2."))

    ' Condition that is evaluated based on user input.
    If number = 1 Or number = 2 Then
        GoTo Line1
    Else
        GoTo Line2
    End If

Line1:

    MsgBox ("Great! You entered a " & number & ".")
    GoTo LastLine

Line2:

    MsgBox ("Sorry, you must enter a 1 or a 2.")

LastLine:

    MsgBox ("End of program.")

End Sub
				

Propriedades

Artigo: 213486 - Última revisão: 7 de fevereiro de 2014 - Revisão: 3.6
A informação contida neste artigo aplica-se a:
  • Microsoft Excel 2000 Standard Edition
Palavras-chave: 
kbnosurvey kbarchive kbmt kbdtacode kbhowto kbinfo kbprogramming KB213486 KbMtpt
Tradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine translation ou MT), não tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática? erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 213486

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com