Dit forum staat op alleen-lezen. Je kan hier informatie zoeken en oude berichten terugvinden, maar geen nieuwe berichten plaatsen.
Naar overzicht van alle forums
Hoe zet ik in VB een teller in zijn werk?
Hiermee bedoel ik dat als een stukje code herhaald word dat ik kan tellen hoevaak dit gedaan word.
Moet dat als volgt?
Dim Teller As Integer
Teller = Teller + 1
Maar als ik dan de waarde Teller wil uitlezen blijft hij op 1 staan.
Ik heb dit stukje nodig voor de lege ruimte op te vullen in mijn vorige vraag.
Als de teller op 6 staat is het formulier nl precies groot genoeg.
Michael,
Domme vragen bestaan niet, wel vragen met te weinig info.
In het algemeen:
je hebt een code met een herhalend iets, zoals:
In het begin van je code:
Dim Teller As Integer
Teller = 0 (niet nodig, want dim zorgt daar al voor)
……..
For N = 1 to xxx
Teller = Teller +1
…….
Next N
Vreemd voorbeeld natuurlijk want de loop is ook al een teller.
Kom je er niet uit, dan graag iets meer info!
Succes,
Jaap
De loop word hier gemaakt in een factuur. In het gedeelte DETAIL, want hier moeten bijv 6 items worden afgedrukt.
Voor elke item dat word afgedrukt komt de loop (automatisch) weer terug bij het gedeelte DETAIL in het rapport.
Hier moet dus de teller komen, om te zien hoeveel items er al zijn afgedrukt ivm de beschikbare ruimte op een factuur.
Private Sub Report_Open(Cancel As Integer)
Dim Counter As Byte
………
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Counter = Counter + 1
MsgBox (Counter)
……..
In dit voorbeeld blijf de waarde op 1 en telt ie dus niet,
Wat doe ik verkeerd?JaapT schreef:
Doorzoek het forum
Zoeken met Startpagina
Startpagina Thema's