Code voor een 2de keer overlopen

[yaryd]

Beste,

Binnen mijn programma (AutoCad) kan de tekenaar kiezen om een rijboring van 5 of van 3 toe te passen.

Nu, eenmaal hij deze code om de rijboringen te tekenen heeft overlopen, komt er een Inputbox op het scherm met de vraag of hij nog een rijboring van 5 of van 3 wilt tekenen. Zoja, moet hij een nieuwe hoogte intypen.

De vraag is nu, hoe kan ik ditzelfde stukje code overlopen met de nieuw ingevulde waarde?


Mvg,

Yaryd

 

[AlexV]

Gebruik de zelfde variabel voor de inputbox.
Dan gaat de tweede keer de code met de tweede ingevulde waarde.

Gr,
Alex,

 

[yaryd]

gaat hij dan geen foutmelding geven als ik dit doe?

en hoe keer ik terug naar een bepaalde code die juist boven de code staat om de inputbox op te roepen?

alvast bedankt en mvg,

yaryd

 

[AlexV]

Nee, dat geeft als het goed is geen fout.

Nu kun je de de sub aanroepen met de naam.

Als het dezelfde sub is kun je een simple goto gebruiken.

Wel met een stop er bij anders blijft die in een loop.



Deze zal 1 keer de zelfde sub doorlopen.

Sub Test()
10
' je code
A = A + 1
  MsgBox A
    
If A < 2 Then
    GoTo 10
End If

End Sub

Gr,
Alex,