Goto line???

[lollige]

Hey allemaal, ik had ff een vraagje (ja logish):
Heb je in vbs zoiets als goto line??? dat je een code hebt die zorgt dat je vbs weer naar een bepaalde regel gaat om vanaf daar de boel weer af te spelen???

Bedankt voor jullie antwoorden
Doaghe
Lollige

 

[vanzwam]

Hey allemaal, ik had ff een vraagje (ja logish):
Heb je in vbs zoiets als goto line??? dat je een code hebt die zorgt dat je vbs weer naar een bepaalde regel gaat om vanaf daar de boel weer af te spelen???

Bedankt voor jullie antwoorden
Doaghe
Lollige

Volgens mij niet. In basic, moet je daarmee werken, daar heb je goto en gosub, maar in vbs, denk het niet.

 

[lollige]

aa jammer.
ik dacht het al, want als je gaat googelen vind je alleen on error goto 0 en verder niks...

is er misschien een andere taal waarmee ik makkelijk msgboxjes kan maken, inputboxjes, variabeles zetten naar inputbox, ifjes EN Goto???

 

[Guus2005]

Waarom wil je persé met goto werken?

10 REM Voorbeeld code
20 Goto 10
30 Goto 20
40 Goto Hell

Werken met GOTO is "not done" ofwel niet gebruiken dus.
Wel eens gehoord van procedures, functies en routines? Dan heb je geen GOTO meer nodig. Ook niet in VBS.

Als ik zo in je personal profile kijk zie ik dat je van ná het goto tijdperk bent, dus hoe kom je erbij?

Weest gegroet,
Guus

 

[lollige]

Waarom wil je persé met goto werken?

10 REM Voorbeeld code
20 Goto 10
30 Goto 20
40 Goto Hell

Werken met GOTO is "not done" ofwel niet gebruiken dus.
Wel eens gehoord van procedures, functies en routines? Dan heb je geen GOTO meer nodig. Ook niet in VBS.

Als ik zo in je personal profile kijk zie ik dat je van ná het goto tijdperk bent, dus hoe kom je erbij?

Weest gegroet,
Guus

wel van gehoord, weet niet precies hoe ik ze moet gebruiken... maareh, een goto tijdperk?? nog nooit van gehoord. ik heb gewoon een paar codetalen gedaan en daar ben ik wel eens goto's in tegen gekomen. bijvorobeeld batch

:hiernaar
de code
goto hiernaar

en ik heb als klein kind ook superlogo gedaan, een nederlands kinder programmeer programma en daarin gebruikte ik ook goto's

maareh, hoe zou ik het dan kunnnen aanpakken? ik heb wel met while, wend loop etc. gewerkt, maar dan werken mijn ifjes en elsejes niet meer zoals ik wil....

 

[Guus2005]

:Start
Zet hier maar eens een stukje (goto) code neer dan zal ik die omzetten naar VB.

Als je het dan snapt goto Einde
goto Start

:Einde
Weest gegroet,
Guus

 

[lollige]

ik heb hier ff mijn noob chatbotje naartoe gehaald:

msgbox "Hoi"
msgbox "Gebruik geen hoofdletters, leestekens en zorg dat je alles goed spelt."
msgbox "Niet schelden a.u.b, en als ik iets niet snap, dan komt er opnieuw het intyp schermpje."
msgbox "Als je wilt stoppen moet je exit typen."
msgbox "Veel plezier!"
d=inputbox("Hoi, hoe heet je?")
msgbox "Ah, fijn je te leren kennen " +d
b=true
while b = true
a=inputbox("Wat wil je zeggen")
if a = c then msgbox "Je valt in herhaling!"
c=a
if a = "hallo" then msgbox "Hoi!"
if a = "wat is je lievelings eten" then msgbox "Spinazie vla!"
if a = "hoi" then msgbox "Hey!"
if a = "exit" then b = false
Wend

dat werkt, maar als ik er dit van maak:

if a = "exit" then b = false
else then msgbox "dat snap ik niet"
Wend

dan werkt ie niet.
en als ik die while en wend weghaal, dan doet ie het wel...
dus ik d8, dat kan ik bijvoorbeeld verhelpen met een goto, dan moet ik alleen die exit aanpassen.

 

[Guus2005]

if a = "exit" then b = false
else then msgbox "dat snap ik niet"
Wend

VB kent twee manieren voor het if-then-else statement.

IF conditie THEN statement

en

IF conditie THEN
    statement
ELSE ' (Hier kan ook nog een conditie achter: ELSEIF ...)
    statement
END IF

Je gebruikt er nu twee door elkaar.
dus maak ervan

if a = "exit" then 
    b = false
else
    msgbox "dat snap ik niet"
end if
Wend

Dan zou die moeten werken.

HTH
Weest gegroet
Guus

 

[lollige]

Dankje voor je hulp, 't is me gelukt!