[VB6] timer x sec aan/uit

[Verwijderd]

hallo
ben hier ff bezig met een progie in vb6
en nu wil een timer een x sec aan en een x sec uit
nu is het zo dat ik de timer interval kan beinvloeden met timer.interval= x
maar dat is bijv. 2 sec aan en 2 uit
het is echter de bedoeling bijv. 2 aan en 10 uit.
ik weet me god niet hoe ik dat moet doen.
weet misschien 1 van jullie of zoiets mogelijk is?

[Verwijderd]

een tweede timer die de intervals/enables van de 1e zet?

[Verwijderd]

ik meen constant iets met als een var 1 is de timer een waarde te geven en als een var 0 is de timer een waarde te geven (liefst dat de waardes die je moet ingeven in een textbox staan)
of is dit te omslagtig met die waardes?

[Verwijderd]

Ik zou liegen als ik zou zeggen dat ik enig idee had waar je 't over hebt Adem 'n paar kee diep in en uit, en leg je probleem es rustig uit want ehhh ik zit ook maar wat te gokken omdat ik je nie zo volg

[Adion]

Zet gewoon in je timer

code:

If Timer1.Interval = 2000 Then
  doe wat je wil doen na 2 seconden
  Timer1.Interval = 10000
Else
  doe wat je wil doen na 10 seconden
  Timer1.Interval = 2000
End If

[Verwijderd]

Verwijderd schreef op 17 augustus 2002 @ 23:45:
Ik zou liegen als ik zou zeggen dat ik enig idee had waar je 't over hebt Adem 'n paar kee diep in en uit, en leg je probleem es rustig uit want ehhh ik zit ook maar wat te gokken omdat ik je nie zo volg

nou oke
ik wil dan 2 textbox'jes waarin je een getallen kan zetten die getallen komen dan overeen met de timer.interval=x
in textbox1 zet je bijv. 5000 en in textbox2 zet je 10000 nou is het de
bedoeling dan iets 5 sec lang aan is en 10 sec niks gebeurt, 5 sec aan, 10 uit etc......

[MisterE]

kan je niet beter een countertje eraan toevoegen en er telens een bij optellen.

dus: 5*2 = 10 sec, dus alleen dan moet ie iets doen.
Dus dan heb je maar 1 timer.

sorry, kan je geen voorbeelden geven aangezien ik vb niet ken.

[Verwijderd]

denk het niet ik heb wat gevonden maar dat houd geen variabele vast:

code:

Dim Bit As Boolean


Private Sub Form_Load()
Bit = False
Variabele1 = 1000
Variabele2 = 1000

{dit staat in de timer}

If Bit = False Then Bit = True: D7Segment1.Value = 888: Timer.Interval = Variabele1: Exit Sub
If Bit = True Then Bit = False: D7Segment1.Value = 222: Timer.Interval = Variabele2: Exit Sub

dit met "D7Segment1.Value = 222" dat is even om te testen of hij het deed
dit is een digitaal 7 sigmenten display zoals dat van een wekker...
met deze regels dat doet hij de timer heel mooi de waarde geven waarvoor variabele1 en 2 staan, (variabele1 = aan, variabele2 = uit)
maar nu...
stel ik vervang de "d7segment.value" door "label1.backcolor=vbred" dan doet hij dat heel mooi..werkt perfect
MAAR als ik iets in een variabele vast wil zetten door middel van "vast=1" of doormiddel van het "d7segment" dan doet hij het niet ja heel ff 0,0001 milliseconde dat zie ik dan op dat display....
hoe laat ik visualbasic die variabele onthouden????

[Sponge]

Je variable in het declaratie gedeelte zetten.. zoals die Bit daarboven. Zet ook Option Explicit boven je code (eerste regel helemaal aan de bovenkant)

[Verwijderd]

heb ik al gedaan maar doet het niet.....

[mulder]

Lees even wat in bv MSDN over variables (types), en variable scope