Advertisement
Guest User

Untitled

a guest
Jan 23rd, 2017
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.35 KB | None | 0 0
  1. Imports System.Runtime.InteropServices
  2. Public Class Form1
  3. Declare Auto function waveOutSetVolume Lib "winmm.dll" (ByVal uDeviceID As IntPtr, ByVal dwVolume As UInteger) As UInteger
  4.  
  5. private const ZERO = &H0
  6.  
  7. private sub Form1_Load(sender as Object, e As EventArgs) Handles Mybase.Load
  8.  
  9. waveOutSetVolume(Me.handle, ZERO)
  10. end sub
  11. End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement