🚀 go-pugleaf

"Tom.Paris" wrote:
> 
> Also, ihr werdet wohl �ber mein problem lachen, aber ich w�rde gerne mal die
> genaus Syntax f�r den Goto Befehl.
> 
> Ich habe erst gestern gegen 2.00 Uhr angefangen und in dem Kurs den ich habe
> wir der nur ganz kurz erw�hnt, f�r mein 1. Vorhaben brauche ich ihn aber
> 
> --
> CU Tom Paris

Tom,

abgesehen, da� man das GoTo Statement heute praktisch kaum mehr einsetzt
(strukturierte Programmierung usw.), hier ein Beispiel aus der VB-Hilfe:

Sub GotoStatementDemo()
Dim Number, MyString
   Number = 1    ' Initialize variable.
   ' Evaluate Number and branch to appropriate label.
   If Number = 1 Then GoTo Line1 Else GoTo Line2
   
Line1:
   MyString = "Number equals 1"
   GoTo LastLine   ' Go to LastLine.
Line2:
   ' The following statement never gets executed.
   MyString = "Number equals 2"
LastLine: 
   Debug.Print MyString   ' Print "Number equals 1" in
      ' the Immediate window.
End Sub


Lothar Geyer

Also mit dem Goto hat das net Funktioniert, vieleicht bin ich auch nur zu
doof, wie man ihn anwedet habe ich soweit kapiert, nur:

Ich habe mir eine sch�ne oberfl�sche gemacht. Ich m�chte mein "Programm"
dazu bringen das wenn man im Men� Datei auf neu Klickt es von vorne beginnt.
Ich habe also ein Click Ereignis daf�r machen wollen, das es bei einem Klick
bei Sub Form_Load weitermacht, wie kann ich das sonst machen?

--
CU Tom Paris
Lothar Geyer <Lothar.Geyer@EDV-Berater-GmbH.de> schrieb in im Newsbeitrag:
398A601B.A06DC11C@EDV-Berater-GmbH.de...
> "Tom.Paris" wrote:
> >
> > Also, ihr werdet wohl �ber mein problem lachen, aber ich w�rde gerne mal
die
> > genaus Syntax f�r den Goto Befehl.
> >
> > Ich habe erst gestern gegen 2.00 Uhr angefangen und in dem Kurs den ich
habe
> > wir der nur ganz kurz erw�hnt, f�r mein 1. Vorhaben brauche ich ihn aber
> >
> > --
> > CU Tom Paris
>
> Tom,
>
> abgesehen, da� man das GoTo Statement heute praktisch kaum mehr einsetzt
> (strukturierte Programmierung usw.), hier ein Beispiel aus der VB-Hilfe:
>
> Sub GotoStatementDemo()
> Dim Number, MyString
>    Number = 1    ' Initialize variable.
>    ' Evaluate Number and branch to appropriate label.
>    If Number = 1 Then GoTo Line1 Else GoTo Line2
>
> Line1:
>    MyString = "Number equals 1"
>    GoTo LastLine   ' Go to LastLine.
> Line2:
>    ' The following statement never gets executed.
>    MyString = "Number equals 2"
> LastLine:
>    Debug.Print MyString   ' Print "Number equals 1" in
>       ' the Immediate window.
> End Sub
>
>
> Lothar Geyer

"Tom.Paris" wrote:
> 
> Also mit dem Goto hat das net Funktioniert, vieleicht bin ich auch nur zu
> doof, wie man ihn anwedet habe ich soweit kapiert, nur:
> 
> Ich habe mir eine sch�ne oberfl�sche gemacht. Ich m�chte mein "Programm"
> dazu bringen das wenn man im Men� Datei auf neu Klickt es von vorne beginnt.
> Ich habe also ein Click Ereignis daf�r machen wollen, das es bei einem Klick
> bei Sub Form_Load weitermacht, wie kann ich das sonst machen?
> 

Nun das sollte einfach so gehen:


Private Sub Form_Load

  tu irgend was

End Sub

Private Sub cmdNeu_Click

  Form_Load

End Sub

Ist es das, was Du willst?

Lothar Geyer