[VB6] Looplicht *

[Felixje]

Ik heb 8 ledjes op de printerpoort aangesloten. Ik kan ze wel bedienen met visual basic, maar ik wil er een looplicht van maken. Hoe moet dit? Moet dit met de timer, en zo ja hoe moet ik hem dan programmeren?

[Creepy]

Heb je zelf al enig idee wat te doen? Lijkt me wel toch.

Daarnaast zijn er hier in P&W al behoorlijk wat topics geweest over het aansturen van de printerpoort. Dus gebruik de search eens. Daarnaast vliegen de stukken code je om de oren als je op google gaat zoeken

Een timer in VB lijkt me nu ook niet al te moeilijk om te doen, en ook dat is hier al een paar keer voorbij gekomen. Dus alweer: gebruik de search eens

[RobIII]

Felixje schreef op zaterdag 20 november 2004 @ 21:47:
Ik heb 8 ledjes op de printerpoort aangesloten. Ik kan ze wel bedienen met visual basic, maar ik wil er een looplicht van maken. Hoe moet dit? Moet dit met de timer, en zo ja hoe moet ik hem dan programmeren?

• Plemp een timer op je form
• Copy / Paste:

Visual Basic 6:

Option Explicit

Private myVar As Integer

Private Sub Form_Load()
    myVar = 1
    Timer1.Interval = 500
    Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
    myVar = myVar * 2
    If myVar >= 256 Then myVar = 1
    
    SendToLPT CByte(myVar)
End Sub

Er basic programmeerwerk hoor...

offtopic:
Creepy!
Volgens mij heb ik wat gemist...Sinds wanneer ben jij mod? Feli nog dan! Staat je goed dat kleurtje!

[ Voor 22% gewijzigd door RobIII op 21-11-2004 01:09 ]

[MisterData]

Ik heb z'n programma ooit eens gemaakt maar nooit wat mee gedaan, zal het eens zoeken (als ik het kan vinden...)

[Creepy]

Goed... laten we het er maar op houden dat ik het knopje "Sluit dit topic" ff niet kon vinden
Zie m'n vorige post dus waarom

Edit:
RobIII: pas sinds donderdag avond hoor

[ Voor 17% gewijzigd door Creepy op 21-11-2004 13:19 ]