Jump to content

Visual Basic 2008


Albert03

Recommended Posts

Hallo,

Tijdens het maken van mijn programma (zie vraag uit mijn vorig topic) heb ik nog een probleem ondervonden. Toen ik op het idee kwam om een trackbar te maken om te gebruiken om het volume van windows te regelen, kwam ik dit stukje code tegen via Google:

Public Class Form1
   Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Integer, ByVal dwExtraInfo As Integer)
   Const KEYEVENTF_KEYUP As Long = &H2

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Call keybd_event(System.Windows.Forms.Keys.VolumeUp, 0, 0, 0) 'Volume Up
   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Call keybd_event(System.Windows.Forms.Keys.VolumeDown, 0, 0, 0) 'Volume Down
   End Sub

   Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
       Call keybd_event(System.Windows.Forms.Keys.VolumeMute, 0, 0, 0) 'Mute
   End Sub
End Class

Dit werkt wel, maar ik wil het graag in een trackbar hebben.

Weet iemand hoe ik dit kan doen?

MVG,

Albert

Link to comment
Delen op andere websites

Een reactie plaatsen

Je kan nu een reactie plaatsen en pas achteraf registreren. Als je al lid bent, log eerst in om met je eigen account een reactie te plaatsen.

Gast
Op dit onderwerp reageren...

×   Je hebt text geplaatst met opmaak.   Opmaak verwijderen

  Only 75 emoji are allowed.

×   Je link is automatisch ingevoegd.   In plaats daarvan weergeven als link

×   Je vorige bewerkingen zijn hersteld.   Alles verwijderen

×   You cannot paste images directly. Upload or insert images from URL.

  • Recent actief   0 leden

    • Er zijn hier geen geregistreerde gebruikers aanwezig.
×
×
  • Create New...