他のUSBペリフェラルの挿入と取り外しを検出するには？

Question

なぜこのVB.NETコードはフラッシュディスクの検出にのみ使用できますか？

Select Case m.WParam 
    Case WM_DEVICECHANGE_WPPARAMS.DBT_DEVICEARRIVAL 
     MsgBox("USB Inserted") 
    Case WM_DEVICECHANGE_WPPARAMS.DBT_DEVICEREMOVECOMPLETE 
     MsgBox("USB Removed") 
End Select 

他のUSB周辺機器（マウスやキーボードなど）の挿入と取り外しを検出する方法はありますか？

Answer 1

追加のデバイスが必要な場合は、検出するデバイスのクラスでRegisterDeviceNotificationを呼び出す必要があります。 http://msdn.microsoft.com/en-us/library/aa363431(VS.85).aspx

：あなたがここに戻って取得しますデータを解釈する方法についての詳細情報を見つけることができます

<DllImport("user32.dll", SetLastError:=True)> _ 
Public Shared Function RegisterDeviceNotification(_ 
    ByVal IntPtr As IntPtr, ByVal NotificationFilter As IntPtr, _ 
    ByVal Flags As Int32) As IntPtr 
End Function 

<DllImport("user32.dll", CharSet:=CharSet.Auto)> _ 
Public Shared Function UnregisterDeviceNotification(_ 
    ByVal hHandle As IntPtr) As UInteger 
End Function 

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)> _ 
Public Class DEV_BROADCAST_DEVICEINTERFACE 
    Public dbcc_size As Integer 
    Public dbcc_devicetype As Integer 
    Public dbcc_reserved As Integer 

    <MarshalAs(UnmanagedType.ByValArray, ArraySubType:=UnmanagedType.U1, SizeConst:=16)> _ 
    Public dbcc_classguid() As Byte 

    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=128)> _ 
    Public dbcc_name() As Char 
End Class 

Public Const DEVICE_NOTIFY_ALL_INTERFACE_CLASSES As Integer = &H4 
Public Const DEVICE_NOTIFY_WINDOW_HANDLE As Short = 0 

Private Const WM_POWERBROADCAST As Integer = &H218 
Private Const PBT_APMSUSPEND As Integer = &H4 

Private Const WM_DEVICECHANGE As Integer = &H219 
Private Const DBT_DEVICEARRIVAL As Integer = &H8000 
Private Const DBT_DEVICEREMOVECOMPLETE As Integer = &H8004 

Private Const DBT_DEVTYP_VOLUME As Integer = &H2 
Private Const DBT_DEVTYP_DEVICEINTERFACE As Integer = &H5 
Private Const DBT_DEVTYP_HANDLE As Integer = &H6 
Private Const DBT_DEVTYP_OEM As Integer = &H0 
Private Const DBT_DEVTYP_PORT As Integer = &H3 

Private Sub RegisterDeviceNotifications() 
    'Registers the system to notify us about interfaces when they are plugged in and unplugged. 
    'http://msdn.microsoft.com/en-us/library/aa363431(VS.85).aspx 
    Dim deviceInterface As New DEV_BROADCAST_DEVICEINTERFACE() 
    Dim size As Integer = Marshal.SizeOf(deviceInterface) 
    deviceInterface.dbcc_size = size 
    deviceInterface.dbcc_devicetype = DBT_DEVTYP_DEVICEINTERFACE 
    Dim buffer As IntPtr = Nothing 
    buffer = Marshal.AllocHGlobal(size) 
    Marshal.StructureToPtr(deviceInterface, buffer, True) 
    Dim r As IntPtr = Nothing 
    r = RegisterDeviceNotification(Me.Handle, buffer, DEVICE_NOTIFY_WINDOW_HANDLE Or DEVICE_NOTIFY_ALL_INTERFACE_CLASSES) 

End Sub