Hallo,

ich bin hier noch ganz neu, das ist meine erste Frage in diesem Forum.
Aber ich kenne VB-Paradise natürlich schon länger

Ich arbeite gerade an einem Programm, dass sehr viele Subs enthält, die nacheinander aus einer Sub heraus aufgerufen werden.

Hier ein kleines Beispiel:



In sub2 bei "Hier unterbrechen" möchte ich zum einen die sub2 beenden (Exit Sub) und zum anderen aber auch verhindern, dass sub3 geöffnet wird.

Ich habe schon recherchiert, bin aber zu keiner Lösung gekommen.

Globale Variable setzten, dass abgebrochen wurde und vorm ausführen von sub3 diese prüfen.

Oder statt Sub-Methoden die Funktionen und deren Return-Value nutzen: True => Vollständig durchgelaufen, False => Abgebrochen und entsprechend danach handeln.

Vielen Dank für die schnelle Antwort!

Ich hatte gehofft, man könnte durch "Stop" oder so einfach alles danach beenden.

Weil das geht sicher an die 100 Subs und dann 100 Mal prüfen ob's geklappt hat...

Gibt es wirklich keine Alternative?

Naja "alles" kann man beenden, indem Application.Exit() einträgst. Dann wird das Programm beendet.

Ja, klar. Danke
Warum nicht grad End?

Nein, es soll einfach die Abfolge unterbrochen/gestoppt werden.
Im Beispiel soll einfach nach der 3. MessageBox Schluss sein.
Das Fenster soll offen bleiben und wenn ich nochmal die sub1 aufrufe, soll es wieder von vorne los gehen.

Naja, dann musst halt prüfen vorm Aufruf. Eine aufgerufene Sub kann ja nicht an die aufrufende Sub was mitteilen dass sie auch beendet werden soll. Wenn du sowas willst, nutze vlt. eher ein Thread, weil den kannste dann an jeder Stelle beenden. Was quasie Applikation.Exit() entspricht, da aber ein extra Thread genutzt wird, bleibt die Hauptanwendung offen.

Aber Btw. vlt. sollte mal das Code-Konzept überdacht werden. 100 Subs, da kräuseln sich ja ein die Fussnägel hoch wenn man das hört.

So weit bin ich auch schon gekommen. Aber trotzdem danke!

Ich werde eine Lösung finden und die dann hier noch ergänzen.

Das erscheint mir jetzt die einfachste Lösung zu sein.
Wie dodo schon gesagt hat, eine globale Variable setzten und dann prüfen.

Also du hast definitiv einen Design Fehler.
Abgesehen davon Kannst dir die restlichen Ifs sparen da diese nie angekickt werden, wenn deine "ende" Variable 1 hat.
Abgesehen davon nimm keinen Double als Datentyp wenn du nur 2 Zustände darstellen willst. Hierfür gibt es eigens einen -> Boolean welcher nur False/True kann.

lg

Mir ist schon bewusst, dass das Beispiel, so wie es ist, keinen Sinn macht.

Später in meinem Programm wird ende = 1 nur, wenn ein Fehler aufgedrehten ist.
Die einzelnen Funktionen in den Subs sind aber sehr komplex und werden mehrfach benötigt, immer in einer anderen Reihenfolge.
Somit erreiche ich einen halbwegs kurzen, übersichtlichen und sehr stabilen Code.

Du kannst mir glauben, dass in meinem Fall der beste Weg die Einteilung in viele Subs ist

Aber vielen Dank für die Tipps, vor allem schon nach so kurzer Zeit!

Du hast definitiv einen DesignFehler.
Deine Subs sollen eine Information zurückgeben, nämlich, ob die übergeordnete Sub abbrechen soll. Subs, die eine Information zurückgeben, nennt man Function.
Functions, die als Bool zurückgeben, ob sie iwas mit erfolg durchgeführt haben, bename ich immer mit TryXY.

nu gugge diese:

Da die Lösung mit den Subs ja eh völlig unsbauer ist und somit auf guten übersichtlichen Codestil kein Wert gelegt wird, ist mir noch eine andere Lösung eingefallen die wohl auch einfach um zu setzten ist