Jump to content
View in the app

A better way to browse. Learn more.

GTAGames.nl - De Nederlandse Grand Theft Auto Community!

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Actie linken aan een bepaalde toets in VB

Voor een DIY projectje (koppelingspedaal, nog wel gevoelloos, maar het is een begin) wil ik door de parallelle poort uit te lezen (die code heb ik al ;)) een toets aansturen, bijvoorbeeld dat als de status van de poort 001 of 128 is, een bijbehorende toets (bijvoordeeld de spatiebalk of een willekeurige letter) activeert, zodat ik die in een game kan instellen als Clutch.

Dit is trouwens ook iets wat ik op een kleine schaal wil gaan produceren, zodra ik ook traploze bedienin kan realiseren. Dus misschien een leuke kans om een beetje bekend te worden (naamvermeldingen op de site, cd en handleiding). Iedereen die me hier nuttig mee helpt, krijgt een vermelding.

Het zal wel VB-noob code zijn, maar ik ben ook een VB-noob ;)

EDIT: maak jullie allemaal maar geen zorgen, de aansluiting zal in de definitieve versie in USB zijn, trucje van het vak ;)

Edited by Schno009

Featured Replies

Dit kan wel, ik zal het proberen uit te leggen:

Start eerst je project op, en zet dit in de code van de betreffende form.

Je komt bij de code door te dubbelklikken op je form of via View -> Code.

Voeg dit toe:

Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeySpace Then 
MsgBox "Je drukte op de spatie, dus nu sluit het programma!"
End
End If
End Sub

Even per regel:

De Private Sub is het begin van de code.

If KeyAscii = vbKeySpace Then : als de keyascii (ingedrukte toets) vbKeySpace (spatiebalk) is, dan........

voor vbKeySpace kun je natuurlijk ook iets anders neerzetten, zoals vbKeyA voor de A-toets, vbKeyB voor de B-toets, vbKeyEscape voor de escape toets, etc.

MsgBox "Je drukte op de spatie, dus nu sluit het programma!" : Als op de spatiebalk gedrukt wordt, laat een messagebox zien met de tekst "Je drukte op de spatie, dus nu sluit het programma!" .

End : Als de messagebox wordt weggeklikt, gooi dan het programma uit.

End If : Einde van de if (als). Dus de code die wordt uitgevoerd na het op drukken van de toets

End Sub : Einde van de code

Hopelijk werkt het, en anders kun je het altijd aan mij vragen via MSN. :Y

Mvg,

Flitskikker

  • Author

Het moet juist nét andersom...

Als de status van de LPT bijvoorbeeld 001 is moet de spatiebalk geactiveerd worden...

Als dit niet mogelijk is, zal ik via de gameport verder moeten gaan, maar niet elke nieuwe computer heeft nog zoeen (including me)

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

Recently Browsing 0

  • No registered users viewing this page.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.