Probleme bei device.exe wegen goto-Befehl

[urgott]

Hallo,
ich habe mein erstes Programm geschrieben und das funktioniert auch so wie ich es will. Nur wenn ich es als device.exe compilieren möchte erscheint die Fehlermeldung: error CS0159 Die Bezeichnung startspeichern ist im Bereich der goto-Anweisung nicht vorhanden. Line: goto startspeichern.

Ich habe Buttons die Befehle ausführen und zusätzlich Pulldownmenüs (die man unten links und rechts anlegen kann) die den selben Befehl ausführen sollen. Um nicht zweimal das ganze als Code zu schreiben verwende ich den goto-Befehl um zur gleichen Sub zu gelangen.

Wenn jemand mir helfen kann oder einen anderen Vorschlag hat wie das generell benutzen kann wäre ich sehr dankbar.

Urgott

[berndgoedecke]

Hallo Urgott,
wenn ich es richtig verstanden habe möchtest du den Efekt erreichen, den das anliegende Beispiel zeigt.

Gruß

berndgoedecke

[specci48]

Der Button und das zugehörige Menu sollen identischen Code ausführen.
Hierzu kann man auch die Sub eines Events direkt aufrufen, z.B.

Sub Button1_Click
    ' tue hier etwas sehr wichtiges ;-)
End Sub

Sub Menu1_Click
        ' tue genau das, was bei Button1 l�uft
    Button1_Click
End Sub

Und noch etwas eleganter - man weist dem Standardevent vom Button und von dem Menu nicht eine eigene Sub zu, sondern direkt eine identische:

Sub App_Start
    Form1.Show
    AddEvent("Button1", Click, "Button1_oder_Menue1")
    AddEvent("Menu1", Click, "Button1_oder_Menue1")
End Sub

Sub Button1_oder_Menue1
    ' tue hiuer etwas wichtiges f�r Button1 und Menue1
End Sub

Gruß
specci48

[urgott]

Halo.
Danke für deine schnelle Antwort. Habe das Programm umgeschrieben und kann jetzt auch eine device.exe erstellen. Weiß du weshalb der goto-Befehl Probleme bereitet?

Noch eine kleine Frage: Gibt es einen Befhel mit dem man eine Sub beenden kann ohne das ganze Programm zu beenden?

Nochmals danke.

Urgott

[Filippo]

Hallo urgott,

du kannst eine Sub einfach mit ein return beenden.

PHP Code:

Sub Test
  ...
  ...
  if weiter=true then return
  ...
  ...
End Sub 


Ciao,
Filippo

[specci48]

Originally Posted by urgott

Weiß du weshalb der goto-Befehl Probleme bereitet?

Eine generelle Ferndiagnose ist schwer möglich, dazu müßtest Du mal den Code Deiner Sub posten.
Aber: Betrachtet man den verfügbaren Sprachumfang von Basic4ppc, so ist der Goto-Befehl eigentlich überflüssig, weil man in jeder hinsicht "eleganter" programieren kann. Für die Variante "Sprung ans Sub-Ende" zum direkten Rücksprung aus einer Sub dient Return (siehe Post von Filippo) und für den Fall "Sprung aus einer Schleife" heraus kann man den Befehl Break verwenden.

Gruß
specci48

[klaus]

Hallo specci48
Den Befehl Break kannte ich nicht aber den Befehl Exit ja.
Habe im Helpfile nachgeschaut und in der Liste führt der Name Break zu Exit.
Break scheint also ein älterer Befehl zu sein und ist durch Exit ersetzt.

Güsse
Klaus
Switzerland

[specci48]

Hallo Klaus,

Du hast ja recht, Exit statt Break.

So etwas kommt halt vor, wenn man Programmiersprachen durcheinander wirft.

Tagsüber im Job Java, abends in der Freizeit Basi4ppc


Gruß
specci48

[klaus]

Den Goto Befehle sollte man vergessen !
Der Neue Compiler hat noch mehr Einschränkungen als der vorhergehende.
Ich verwende in meinem Natural Frequency Programm eine alte Eigenwert Routine von HP mehr als 20 Jahre alt mit etlichen verschlungenen Goto's. Sie funktionnierte perfekt in HP Basic nachher in VB Basic, habe sie nach Basic4PPC übertragen, funktionierte nicht im alten Compiler. Agraham hat zwei For Next Schlaufen in zwei Do Loop Schlaufen ersetzt und dann lief es. Im Neuen Compiler funktioniert diese Routine nicht mehr.

Wenn es jemanden interessiert sich sogenannten Spagetticode anzusehen den findet Ihr in:
http://www.basic4ppc.com/forum/questions-windows-mobile/1201-eigenvalue-eigenvector-calculation.html

Man könnte sich die Frage stellen ob man den Goto Befehl in Basic4PPC nicht schlicht beseitigen sollte da er im Neuen Compiler mit den Einschränkungen wahrscheinlich mehr Verwirrung einführt als Lösungen bringt.


Grüsse
Klaus
Switzerland

[agraham]

Originally Posted by klaus

Im Neuen Compiler funktioniert diese Routine nicht mehr.

Surprise!

http://www.basic4ppc.com/forum/showthread.php?t=1201