<StructLayout(LayoutKind.Sequential)> _
    Public Structure SP_DEVINFO_DATA
        Public cbSize As Integer
        Public ClassGuid As Guid
        Public PropertyID As Integer
        Public Reserved As IntPtr
    End Structure
 
    <StructLayout(LayoutKind.Sequential)> _
    Public Structure SP_DEVICE_INTERFACE_DATA
        Public cbSize As Integer
        Public InterfaceClassGuid As Guid
        Public Flags As Integer
        Public Reserved As IntPtr
    End Structure
 
    <DllImport("setupapi.dll", _
    EntryPoint:="SetupDiGetClassDevsW", _
    SetLastError:=True, _
    CharSet:=CharSet.Unicode, _
    ExactSpelling:=True, _
    PreserveSig:=True, _
    CallingConvention:=CallingConvention.Winapi)> _
    Private Shared Function SetupDiGetClassDevs( _
    ByRef ClassGuid As Guid, _
    ByVal Enumerator As Integer, _
    ByVal hwndParent As Integer, _
    ByVal Flags As Integer) As Integer
    End Function
 
    Private Declare Function SetupDiEnumDeviceInterfaces Lib "setupapi.dll" ( _
        ByRef DeviceInfoSet As Int32, _
        ByRef DeviceInfoData As SP_DEVINFO_DATA, _
        ByVal InterfaceClassGuid As Guid, _
        ByVal MemberIndex As Integer, _
        ByRef DeviceInterfaceData As SP_DEVICE_INTERFACE_DATA) As Integer