goto in anderen Sub

  • VB.NET

Es gibt 4 Antworten in diesem Thema. Der letzte Beitrag () ist von Dennis Alexander.

    Mach es doch so:

    VB.NET-Quellcode

    1. Private Sub Button1_Click()
    2. anderer_sub(true)
    3. exit sub
    4. End Sub
    6. Sub anderer_sub(byval alles_ueberspringen as boolean)
    7. if alles_ueberspringen = true then
    8. goto punkt
    9. end if
    10. 'Code
    11. punkt:
    12. 'Code
    13. End Sub


    Wobei man sagen muss, dass Gotos altmodisch sind. Sie führen zu Spagetti-code. Aus diesem Grund gibt es auch keine in PHP. Das ist auch gut so.

    'edit pico war schneller ;):
    Und ich bin mir fast sicher, das Goto 1 Mio Jahre alt ist und seit mindestens 900.000 Jahren nicht mehr verwendet werden soll. Schon gar nicht in VB 2010 ...
    Von meinem iPhone gesendet

    Wenn man eine Beta-Version von 2010 nutzt, und solche Fragen stellt ...

    VB.NET-Quellcode

    1. Private Sub Button1_Click()
    2. worker2()
    3. End Sub
    5. Sub anderer_sub()
    6. 'Code
    7. worker2()
    8. End Sub
    10. Sub worker2()
    11. ' zweiter Code
    12. End Sub


    Ansonsten nikee13´s Antwort anschauen und dort das goto streichen ;)

    Darüberhinaus sollte man sich Gedanken machen, ob man nicht etwas am logischen Aufbau verkehrt gemacht hat. Es passiert schnell, das man von hinten nach Vorne denkt, vorallem wenn alles nach einer zeit zu groß wird und unübersichtlich wird.

Facebook
Telefonspende