Hallo Leute,
ich schonwieder Ich weiss "GoTo" ist ein "schlechter Programmierstil" etc. Aber bei meinem derzeitigen Programm hilft es mir weiter, da das Programm den PC Namen ändert und danach neugestartet wird und ich mittels einer ausgelagerten Variable in einer textfile auf den aktuellen stand abprüfe und dann mittels goto zu den jeweiligen lines springe.
Allerdings fiel mir auf, dass wenn zu der sprungmarke "gesprungen" wird die nachfolgenden aktionen NICHT mehr ausgeführt werden.
Also zb
If IO.File.ReadAllText("datei.txt") = "a2" then
goto abschnitt2
endif
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
function1()
function2()
function3()
aschnitt2:
function4()
function5()
End Sub
Springe ich zu Abschnitt2 steht das Programm. Function4 und Function5 werden nicht ausgeführt.
Ist das so beabsichtigt, wie kann ich es richtig stellen? Irgendwer eine Idee? Habe den Befehl das letzte mal in VB6 bzw. QuickBasic benuzt!
Danke im Vorraus,
Mfg
ich schonwieder Ich weiss "GoTo" ist ein "schlechter Programmierstil" etc. Aber bei meinem derzeitigen Programm hilft es mir weiter, da das Programm den PC Namen ändert und danach neugestartet wird und ich mittels einer ausgelagerten Variable in einer textfile auf den aktuellen stand abprüfe und dann mittels goto zu den jeweiligen lines springe.
Allerdings fiel mir auf, dass wenn zu der sprungmarke "gesprungen" wird die nachfolgenden aktionen NICHT mehr ausgeführt werden.
Also zb
If IO.File.ReadAllText("datei.txt") = "a2" then
goto abschnitt2
endif
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
function1()
function2()
function3()
aschnitt2:
function4()
function5()
End Sub
Springe ich zu Abschnitt2 steht das Programm. Function4 und Function5 werden nicht ausgeführt.
Ist das so beabsichtigt, wie kann ich es richtig stellen? Irgendwer eine Idee? Habe den Befehl das letzte mal in VB6 bzw. QuickBasic benuzt!
Danke im Vorraus,
Mfg