[VB6] Springen tussen subs

[ViNyL]

Ik ben net begonnen met Visual Basic 6 en kom al een heel eind. Ik heb alleen een vraagje:

Ik heb een aantal subs:
-----------------------------------------
Private Sub cmdBegin_Click()

End Sbu

Private Sub Vragen()

End Sub
-----------------------------------------

Hoe kan ik met een regel aangeven in de Sub cmdBegin_Click () dat deze naar de Sub Vragen moet gaan ? GoSub schijnt niet te werken.....

En kan ik ook aageven ga naar Sub Vragen en daar een regel nummer ? bv 1: ?


Dank !

[whoami]

Je roept gewoon in die ene procedure de andere op.

code:

Private Sub cmd_Begin()
   Vragen
End Sub

oid.

Tip: gebruik [code ]tags.

[ViNyL]

Ok thanks, zal ik doen in het vervolg...

En hoe kan ik dan aangeven: Ga naar de Sub Vragen en daar naar regel nummer 10:

[LordLarry]

Kan wel, maar ik stel voor om het niet te vertellen. Het is 'not done' al een hele tijd.

Maak een betere constructie die dat niet nodig heeft.

[ Voor 37% gewijzigd door LordLarry op 10-12-2002 11:33 ]

[ViNyL]

Ok zal het proberen

[Glimi]

Goto considerd harmful

[whoami]

Glimi schreef op 10 december 2002 @ 11:37:
Goto considerd harmful

* whoami zat zelf met hetzelfde linkje in gedachten.

Het is het best om een goto nooit te gebruiken. Zo'n dingen kun je wel altijd op een andere/betere en gestructureerde manier oplossen.
Dit geld trouwens ook voor globale variabelen.

[ViNyL]

En nog iets. Ik heb een form met daar een button op. Ik wil in een aantal subs die button gebruiken om naar de volgende sub te gaan. Kan dit ?

[OZ-Gump]

ViNyL schreef op 10 December 2002 @ 13:24:
En nog iets. Ik heb een form met daar een button op. Ik wil in een aantal subs die button gebruiken om naar de volgende sub te gaan. Kan dit ?

Het zal vast kunnen... maar wat bedoel je ermee dat je een knop IN subs wil gebruiken om naar de volgende sub te gaan? Wil je dat de execution pas verder gaat na het drukken op de knop of wat is precies je bedoeling (en het nut?).

[ViNyL]

Ik ben bezig een soort toets proggie te maken.

In een sub zet ik een vraag (door label caption steeds te veranderen) onderin het form staat een button met Next erop. Als je hierop klikt moet ie naar de volgende sub gaan. Daarin wordt het label caption weer aangepast met een nieuwe vraag etc....

Beetje omslachtig misschien maar ja, de bieb is straks pas open...ff een boekje halen

[OZ-Gump]

de bieb is straks pas open...ff een boekje halen

Dat lijkt me inderdaad geen slecht idee...
Is het niet verstandiger om bijvoorbeeld alle vragen die je hebt in een tabelletje te zetten (bijvoorbeeld: ID | Vraag | Antwoord ) en dan met een while-loopje door de vragen heen lopen. Sla vervolgens alle antwoorden die gegeven zijn op in een (andere) tabel, dan heb je meteen historievorming. Springen van de ene sub naar de andere lijkt me erg wazig...
Als je dat toch per sé wil doen: maak een afhandeling van de knop aan de hand van de caption (die stel je ook in!).
Of houd een status bij van waar je bent en dus wat er moet gebeuren als er op die knop geramd wordt... (Dat wordt een SELECT CASE...)

[ Voor 3% gewijzigd door OZ-Gump op 10-12-2002 13:51 ]

[Freee!!]

whoami schreef op 10 december 2002 @ 11:40:
Dit geld trouwens ook voor globale variabelen.

Er zijn programmeertalen waarin alle variabelen global zijn, waaronder het zeer veel gebruikte COBOL en het minder bekende RPG (Report Program Generator), een IBM-specifieke taal.

[Danfoss]

OZ-Gump schreef op 10 December 2002 @ 13:51:
[...]
Of houd een status bij van waar je bent en dus wat er moet gebeuren als er op die knop geramd wordt... (Dat wordt een SELECT CASE...)

Dat is idd wel een makkelijke. Voor de status zou je in principe ook de vraag-id kunnen gebruiken. Met deze oplossing kan je ook heel makkelijk een back-knop erbij zetten.

[ViNyL]

Ok, dan zal ik mijn zo te halen boekje eens ff goed bestuderen

[Verwijderd]

whoami schreef op 10 december 2002 @ 11:40:

[...]


* whoami zat zelf met hetzelfde linkje in gedachten.

Het is het best om een goto nooit te gebruiken. Zo'n dingen kun je wel altijd op een andere/betere en gestructureerde manier oplossen.
Dit geld trouwens ook voor globale variabelen.

ik gebruik in VB vaak

code:

On error goto hell
'code hier

hell:
MsgBox  Error

is dit ook gevaarlijk ??? ik wordt niet echt wijzer van die link, allemaal zo ingewikkeld

[Verwijderd]

On error goto hell
'code hier


<------------- exit funtion of exit sub
hell:
MsgBox Error
<------------- Resume of resume Next

[ Voor 30% gewijzigd door Verwijderd op 10-12-2002 18:57 ]

[beany]

ViNyL schreef op 10 December 2002 @ 11:24:
Ik ben net begonnen met Visual Basic 6 en kom al een heel eind. Ik heb alleen een vraagje:

<knip>

Dank !

Hmm, waarom begin je niet met VB.Net? Gelijk wat meer OO(nooit mis om daar wat van te leren)

En je hebt geen On Error Goto's meer nodig

[robjanssen]

On Error Goto .... is een goede manier voor foutafhandeling in VB6.

[muba]

ViNyL schreef op 10 December 2002 @ 13:24:
En nog iets. Ik heb een form met daar een button op. Ik wil in een aantal subs die button gebruiken om naar de volgende sub te gaan. Kan dit ?

Niet zoals jij het zegt, wel logischer dan jij het zegt:

code:

dim teller as integer

private sub knopjeklik_click()
  teller = teller + 1
  if teller = 1 then knopjeklik.caption = "je hebt 1 keer gedrukt"
  if teller = 2 then msgbox "je hebt 2 keer gedrukt"
  if teller = 3 then form1.caption = "je hebt 3 keer gedrukt"
  if teller = ... ... ...
  ...
end sub

[ Voor 4% gewijzigd door muba op 10-12-2002 19:55 ]

[muba]

BTW interresant topic... een n00b (niets tegen n00bs hoor!) die WEL zijn best doet

offtopic:

En wat is dat 4% achter nadat ik gedit had?

MUBA wijzigde dit bericht 10-12-2002 19:55 (4%)

[ Voor 10% gewijzigd door muba op 10-12-2002 20:01 ]

[Verwijderd]

Verwijderd schreef op 10 December 2002 @ 18:54:
[...]


ik gebruik in VB vaak

code:

On error goto hell
'code hier

hell:
MsgBox  Error

is dit ook gevaarlijk ??? ik wordt niet echt wijzer van die link, allemaal zo ingewikkeld

Deze constructie gebruik ik ook voor regelmatig voorkomende 'memory cleanups' als er iets mis gaat in mijn c functies. Daar is helemaal niets mis mee. Sowiezo is er niet zoveel mis met een goto behalve dat je code er ongeloofelijk ononverzichtelijk door kan worden en dat is een bron van fouten. Maar als je het in zo'n simpele 'goto hell' situatie gebruikt is er vaak niets aan de hand.

[ Voor 12% gewijzigd door Verwijderd op 10-12-2002 20:54 ]

[ViNyL]

beany schreef op 10 december 2002 @ 19:16:
[...]


Hmm, waarom begin je niet met VB.Net? Gelijk wat meer OO(nooit mis om daar wat van te leren)

En je hebt geen On Error Goto's meer nodig

Ja zou idd wel kunnen, maar ik heb van mijn stage een cd'tje met VB6 geleend. Daar hebben ze geen .Net.

[whoami]

Mr. Liu schreef op 10 December 2002 @ 13:55:
[...]

Er zijn programmeertalen waarin alle variabelen global zijn, waaronder het zeer veel gebruikte COBOL en het minder bekende RPG (Report Program Generator), een IBM-specifieke taal.

Damn those languages.

* whoami kent ze allebei en heeft ze nog alletwee ooit op school gebruikt.

[Freee!!]

whoami schreef op 11 december 2002 @ 11:47:
[...]
* whoami kent ze allebei en heeft ze nog alletwee ooit op school gebruikt.

RPG op school? Ik wist niet dat dat ergens gegeven werd, COBOL opleidingen zijn er genoeg, maar wordt op scholen niet of nauwelijks onderwezen en RPG wordt (in Nederland) veel minder gebruikt.

[D2k]

Mr. Liu: whoami is dan ook een zuiderbuur, daar doen ze wel meer gekke dingen

[whoami]

Mr. Liu schreef op 11 december 2002 @ 11:52:
[...]

RPG op school? Ik wist niet dat dat ergens gegeven werd, COBOL opleidingen zijn er genoeg, maar wordt op scholen niet of nauwelijks onderwezen en RPG wordt (in Nederland) veel minder gebruikt.

Uhuh. In de school waar ik gezeten heb (in Belgie ), hadden ze een AS400 en er werd daar (en nu nog steeds) COBOL en RPG gegeven. (In mijn tijd was het nog COBOL op pc, maar nu ook op AS400).
Dit omwille de grote vraag toen van de vele KMO's in de streek.

[Freee!!]

whoami schreef op 11 December 2002 @ 11:53:
[...]
Uhuh. In de school waar ik gezeten heb (in Belgie ), hadden ze een AS400 en er werd daar (en nu nog steeds) COBOL en RPG gegeven. (In mijn tijd was het nog COBOL op pc, maar nu ook op AS400).
Dit omwille de grote vraag toen van de vele KMO's in de streek.

Oeps, had ik toch even je profile moeten checken (doe ik meestal wel)