트랙볼 컨트롤로 시스템 볼륨 조정

Question

VB.NET에서 트랙 바 컨트롤로 시스템 볼륨을 제어 할 수 있습니까?

사용자가 트랙 바의 값을 조정하면 시스템의 볼륨도 변경됩니다. 사전에

감사합니다!

Answer 1

제공된 @dude 링크에 대한 답변을 찾았습니다. 감사.

수입 시스템 수입 System.Windows.Forms 수입 System.Runtime.InteropServices

네임 스페이스 WindowsFormsApplication1 일부 공공 Form1 클래스 상속 양식 정수로 정수 = & H80000 개인 헌장 APPCOMMAND_VOLUME_UP으로 개인 헌장 APPCOMMAND_VOLUME_MUTE = & HA0000 개인 Const APPCOMMAND_VOLUME_DOWN As 정수 = & H90000 개인 Const WM_APPCOMMAND As 정수 =당신이 "vb.net 변경 시스템 볼륨을"쿼리 할 때H319

<DllImport("user32.dll")> _ 
    Public Shared Function SendMessageW(ByVal hWnd As IntPtr, _ 
      ByVal Msg As Integer, ByVal wParam As IntPtr, _ 
      ByVal lParam As IntPtr) As IntPtr 
    End Function 

    Private Sub btnMute_Click(ByVal sender As Object, ByVal e As EventArgs) 
     SendMessageW(Me.Handle, WM_APPCOMMAND, _ 
         Me.Handle, New IntPtr(APPCOMMAND_VOLUME_MUTE)) 
    End Sub 

    Private Sub btnDecVol_Click(ByVal sender As Object, ByVal e As EventArgs) 
     SendMessageW(Me.Handle, WM_APPCOMMAND, _ 
        Me.Handle, New IntPtr(APPCOMMAND_VOLUME_DOWN)) 
    End Sub 

    Private Sub btnIncVol_Click(ByVal sender As Object, ByVal e As EventArgs) 
     SendMessageW(Me.Handle, WM_APPCOMMAND, _ 
        Me.Handle, New IntPtr(APPCOMMAND_VOLUME_UP)) 
    End Sub 
End Class 

최종 네임 스페이스