16,552
社区成员
发帖
与我相关
我的任务
分享
#Region "WndProc常量"
Public Const WM_DEVICECHANGE As Integer = &H219
Public Const DBT_DEVICEARRIVAL As Integer = &H8000
Public Const DBT_CONFIGCHANGECANCELED As Integer = &H19
Public Const DBT_CONFIGCHANGED As Integer = &H18
Public Const DBT_CUSTOMEVENT As Integer = &H8006
Public Const DBT_DEVICEQUERYREMOVE As Integer = &H8001
Public Const DBT_DEVICEQUERYREMOVEFAILED As Integer = &H8002
Public Const DBT_DEVICEREMOVECOMPLETE As Integer = &H8004
Public Const DBT_DEVICEREMOVEPENDING As Integer = &H8003
Public Const DBT_DEVICETYPESPECIFIC As Integer = &H8005
Public Const DBT_DEVNODES_CHANGED As Integer = &H7
Public Const DBT_QUERYCHANGECONFIG As Integer = &H17
Public Const DBT_USERDEFINED As Integer = &HFFFF
#End Region
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
If m.Msg = WM_DEVICECHANGE Then
Select Case m.WParam
Case DBT_DEVICEARRIVAL : MsgBox("插啊")
Case DBT_DEVICEREMOVECOMPLETE : MsgBox("拔啦")
Case Else
End Select
End If
MyBase.WndProc(m)
End Sub