Private Shared Function DestroyPropertySheetPage(ByVal hPage As IntPtr) As Integer

    Public Shared Function GetScrollPos(ByVal hWnd As IntPtr, ByVal nBar As Integer) As Integer

    Private Shared Function SetScrollPos(ByVal hWnd As IntPtr, ByVal nBar As Integer, ByVal nPos As Integer, ByVal bRedraw As Boolean) As Integer

        Set(ByVal value As Integer)

        Set(ByVal value As Integer)

Declare Function ImageList_Add Lib "comctl32.dll" (ByVal cx As Integer, ByVal cy As Integer, ByVal flags As uint, ByVal cInitial as Integer, ByVal cGrow as Integer) As IntPtr

Declare Function ImageList_SetIconSize Lib "comctl32.dll" (ByVal hImageList As IntPtr, ByVal cx As Integer, ByVal cy As Integer) As Boolean

        ByVal socketHandle As IntPtr, _

   Public Function inet_ntoa(ByVal IpAddress As Integer) As String

    [MarshalAs(UnmanagedType.ByValTStr, SizeConst = 257)]

    [MarshalAs(UnmanagedType.ByValTStr, SizeConst = 129)]

    [MarshalAs(UnmanagedType.ByValTStr, SizeConst = 257)]

    [MarshalAs(UnmanagedType.ByValTStr, SizeConst = 129)]

    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 255 /* WSAPROTOCOL_LEN */ + 1)]

    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 7 /* MAX_PROTOCOL_CHAIN */)]

Declare Function WinHttpAddRequestHeaders Lib "winhttp.dll" (ByVal hRequest As IntPtr, ByVal pwszHeaders As String, ByVal dwHeaderLength As Integer, ByVal dwModifiers As Integer) As Boolean

Declare Function WinHttpCloseHandle Lib "winhttp.dll" (ByVal hInternet As IntPtr) As Boolean

Declare Function WinHttpConnect Lib "winhttp.dll" (ByVal hSession As IntPtr, ByVal pswzServerName As String, ByVal nServerPort As Short, ByVal dwReserved As Integer) As IntPtr

Declare Function WinHttpOpenRequest Lib "winhttp.dll" (ByVal hConnect As IntPtr, ByVal pwszVerb As String, ByVal pwszObjectName As String, ByVal pwszVersion As String, ByVal pwszReferrer As String, ByRef ppwszAcceptTypes As Byte(), ByVal dwFlags As Integer) As IntPtr

Declare Function WinHttpOpenRequest Lib "winhttp.dll" (ByVal hConnect As IntPtr, ByVal pwszVerb As String, ByVal pwszObjectName As String, ByVal pwszVersion As String, ByVal pwszReferrer As String, ByRef ppwszAcceptTypes As Byte(), ByVal dwFlags As Integer) As IntPtr

Declare Function WinHttpQueryDataAvailable Lib "winhttp.dll" (ByVal hRequest As IntPtr, ByRef lpdwNumberOfBytesAvailable As Integer) As Boolean

Declare Function WinHttpQueryHeaders Lib "winhttp.dll" (ByVal hRequest As IntPtr, ByVal dwInfoLevel As Integer, ByVal pwszName As String, ByVal buffer As Byte(), ByRef lpdwBufferLength As Integer, ByRef lpdwIndex As Integer) As Boolean

Declare Function WinHttpQueryOption Lib "winhttp.dll" (ByVal hInternet As IntPtr, ByVal dwOption As Integer, ByVal lpBuffer As Byte(), ByRef lpdwBufferLength As Integer) As Boolean

Declare Function WinHttpReadData Lib "winhttp.dll" (ByVal hRequest As IntPtr, ByVal lpBuffer As Byte(), ByVal dwNumberOfBytesToRead As Integer, ByRef lpdwNumberOfBytesRead As Integer) As Boolean

Declare Function WinHttpReceiveResponse Lib "winhttp.dll" (ByVal hRequest As IntPtr, ByVal lpReserved As Integer) As Boolean

Declare Function WinHttpSendRequest Lib "winhttp.dll" (ByVal hRequest As IntPtr, ByVal pwszHeaders As String, ByVal dwHeadersLength As Integer, ByVal lpOptional As Byte(), ByVal dwOptionalLength As Integer, ByVal dwTotalLength As Integer, ByVal dwContext As IntPtr) As Boolean

Declare Function WinHttpSetOption Lib "winhttp.dll" (ByVal hInternet As IntPtr, ByVal dwOption As Integer, ByVal lpBuffer As Byte(), ByVal dwBufferLength As Integer) As Boolean

Declare Function WinHttpSetTimeouts Lib "winhttp.dll" (ByVal hInternet As IntPtr, ByVal dwResolveTimeout As Integer, ByVal dwConnectTimeout As Integer, ByVal dwSendTimeout As Integer, ByVal dwReceiveTimeout As Integer) As Boolean

Declare Function WinHttpWriteData Lib "winhttp.dll" (ByVal hRequest As IntPtr, ByVal lpBuffer As IntPtr, ByVal dwNumberOfBytesToWrite As UInteger, ByRef lpdwNumberOfBytesWritten As UInteger) As Boolean

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        [MarshalAs(UnmanagedType.ByValArray)] public SID_AND_ATTRIBUTES[] Groups;

    Private Shared Function CM_Get_DevNode_Status(ByRef status As ULong, ByRef probNum As ULong, ByVal devInst As IntPtr, ByVal Flag As Integer) As Integer

(ByVal DeviceInfoSet As Long, DeviceInterfaceData As Any, _

ByVal DeviceInterfaceDetailDataSize As Long, _

RequiredSize As Long, ByVal DeviceInfoData As Long) As Long

(ByVal lpFileName As String, ByVal dwDesiredAccess As Long, _

ByVal dwShareMode As Long, lpSecurityAttributes As Any, _

ByVal dwCreationDisposition As Long, _

ByVal dwFlagsAndAttributes As Long, _

ByVal hTemplateFile As Long) As Long

(ByVal HandleToClose As Long)

(ByVal Handle As Long, ByVal BufferPtr As Long, _

ByVal ByteCount As Long, BytesReturnedPtr As Long, _

ByVal OverlappedPtr As Long) As Long

(ByVal Handle As Long, Buffer As String, _

ByVal ByteCount As Long, BytesReturnedPtr As Long, _

ByVal OverlappedPtr As Long) As Long

ByVal EnumPtr As Long, ByVal hwndParent As Long, _

ByVal Flags As Long) As Long

(ByVal DeviceInfoSet As Long) As Boolean

Lib “setupapi.dll” (ByVal Handle As Long, _

ByVal InfoPtr As Long, GuidPtr As Long, _

ByVal MemberIndex As Long, _

Public Declare Auto Sub SetupCloseInfFile Lib "setupapi.dll" (ByVal InfHandle As IntPtr)

Public Shared Function SetupDiCallClassInstaller(ByVal InstallFunction As Integer, _

                          ByVal DeviceInfoSet As Integer, _

Public Shared Function SetupDiCallClassInstaller(ByVal InstallFunction As IntPtr, _

                          ByVal DeviceInfoSet As IntPtr, _

    ByVal ClassName As StringBuilder, _

    ByVal ClassGuidSize As Integer, _

    ByVal DeviceInfoSet As Integer) As Boolean

    ByVal DeviceInfoSet As Integer, _

    ByVal MemberIndex As Integer, _

    ByVal DeviceInfoSet As Integer, _

    ByVal MemberIndex As Integer, _

  Public Shared Function SetupDiEnumDeviceInterfaces(ByVal hDevInfo As IntPtr, _

    ByVal memberIndex As UInt32, ByRef deviceInterfaceData As SP_DEVICE_INTERFACE_DATA) As Boolean

    ByVal DeviceInfoSet As IntPtr, _

    ByVal DeviceInfoData As UInteger, _

    ByVal MemberIndex As UInteger, _

    ByVal Enumerator As Integer, _

    ByVal hwndParent As Integer, _

    ByVal Flags As Integer) As Integer

    ByVal samDesired As Integer, _

    ByVal Flags As Integer, _

    ByVal Reserved As Integer) As Integer

    ByVal Enumerator As IntPtr, _

    ByVal hwndParent As IntPtr, _

    ByVal Flags As UInteger) As IntPtr

            [MarshalAs(UnmanagedType.ByValTStr, SizeConst=256)]

            [MarshalAs(UnmanagedType.ByValTStr, SizeConst=256)]

            [MarshalAs(UnmanagedType.ByValTStr, SizeConst=256)]

        [MarshalAs(UnmanagedType.ByValTStr, SizeConst=260)]

Public Shared Function SetupDiGetDeviceInstallParams(ByVal hDevinfo As Integer, _  'Alternate ByVal hDevInfo as IntPtr

        <MarshalAs(UnmanagedType.ByValTStr, SizeConst:=MAX_PATH)> _

    ByVal hDevInfo As IntPtr, _

    ByVal deviceInterfaceDetailDataSize As Int32, _

    ByVal DeviceInfoSet As IntPtr, _

    ByVal DeviceInterfaceDetailDataSize As UInteger, _

SP_DEVICE_INTERFACE_DETAIL_DATA needs a ByVal TCHAR[ANYSIZE_ARRAY] member, which could conceivably be any size. This does not bode well for determining the correct size, however DevicePath should be no longer than MAX_PATH (256).

    ByVal DeviceInfoSet As Integer, _

    ByVal [Property] As Integer, _

    ByVal PropertyBuffer As Byte(), _

    ByVal PropertyBufferSize As Integer, _

    ByVal samDesired As Integer, _

    ByVal Flags As Integer, _

    ByVal MachineName As Integer, _

    ByVal Reserved As Integer) As Integer

Public Declare Auto Function SetupFindFirstLine Lib "setupapi.dll" (ByVal InfHandle As IntPtr, ByVal Section As String, ByVal Key As String, ByRef Context As INFCONTEXT) As Boolean

Public Declare Auto Function SetupFindNextMatchLine Lib "setupapi.dll" (ByRef ContextIn As INFCONTEXT, ByVal Key As String, ByRef ContextOut As INFCONTEXT) As Boolean

Public Declare Auto Function SetupGetStringField Lib "setupapi.dll" (ByRef Context As INFCONTEXT, ByVal FieldIndex As Int32, ByVal ReturnBuffer As String, ByVal ReturnBufferSize As Int32, ByRef RequiredSize As Int32) As Boolean

Public Declare Auto Function SetupOpenInfFile Lib "setupapi.dll" (ByVal FileName As String, ByVal InfClass As String, ByVal InfStyle As Int32, ByRef ErrorLine As UInteger) As IntPtr

    ByVal lpCmdLine As String, _

Private Declare Function DoEnvironmentSubst Lib "shell32.dll" Alias "DoEnvironmentSubstW" (ByVal szString As String, ByVal cbString As Long) As Long

    ByVal hwnd As Long, _

    ByVal fAccept As Long)

    ByVal hDrop As Long)

    ByVal HDROP As Long, _

    ByVal UINT As Long, _

    ByVal lpStr As String, _

    ByVal ch As Long) As Long

     (ByVal hInst As IntPtr, _

      ByVal iconPath As StringBuilder, _

Shared Function ExtractIconEx(ByVal szFileName As String, _

            ByVal nIconIndex As Integer, _

            ByVal phiconLarge() As IntPtr, _

            ByVal phiconSmall() As IntPtr, _

            ByVal nIcons As UInteger) As UInteger

        (ByVal lpszFile As String, _

         ByVal nIconIndex As Integer, _

         ByVal nIcons As Long) As Integer

    Function ExtractIconEx(ByVal szFileName As String, _

        ByVal nIconIndex As Integer, _

        ByVal phiconLarge() As IntPtr, _

        ByVal phiconSmall() As IntPtr, _

        ByVal nIcons As Integer) As Integer

    Function DestroyIcon(ByVal hIcon As IntPtr) As Integer

    Public Function WriteIconOut(ByVal iconsrcpath As String, ByVal icondestpath As String)

    Public Function ExtractIconFromExe(ByVal f As String, ByVal large As Boolean) As Icon

Shared Function ExtractIconEx(ByVal szFileName As String, _

            ByVal nIconIndex As Integer, _

            ByVal nIcons As UInteger) As UInteger

        (ByVal lpszFile As String, _

         ByVal nIconIndex As Integer, _

         ByVal nIcons As Long) As Integer

    Function ExtractIconEx(ByVal szFileName As String, _

        ByVal nIconIndex As Integer, _

        ByVal phiconLarge() As IntPtr, _

        ByVal phiconSmall() As IntPtr, _

        ByVal nIcons As Integer) As Integer

    Function DestroyIcon(ByVal hIcon As IntPtr) As Integer

    Public Function WriteIconOut(ByVal iconsrcpath As String, ByVal icondestpath As String)

    Public Function ExtractIconFromExe(ByVal f As String, ByVal large As Boolean) As Icon

Private Shared Function FindExecutable(ByVal lpFile As String, ByVal lpDirectory As String, ByRef lpResult As StringBuilder) As IntPtr

        (ByVal iDrive As Long) As NetDriveTypes

    [MarshalAs(UnmanagedType.ByValTStr, SizeConst = 260)]

    ByVal pszDir As StringBuilder, _

    <MarshalAs(UnmanagedType.LPWStr)> ByVal pszSpec As StringBuilder) As Integer

         (ByVal prmstrFile As String) As Integer

     ByVal pszUniqueName As StringBuilder, _

     ByVal cchMax As Integer, _

     ByVal pszTemplate As String, _

     ByVal pszLongPlate As String, _

     ByVal pszDir As String) As Boolean

    ByVal pszUniqueName As StringBuilder, _

    ByVal pszPath As String, _

    ByVal pszShort As String, _

    ByVal pszFileSpec As String) As Boolean

Declare Unicode Function PickIconDlg Lib "Shell32" Alias "PickIconDlg" (ByVal hwndOwner As IntPtr, ByVal lpstrFile As String, ByVal nMaxFile As Integer, ByRef lpdwIconIndex As Integer) As Integer

Declare Function SetCurrentProcessExplicitAppUserModelID Lib "shell32.dll" (<MarshalAs(UnmanagedType.LPWStr)> ByVal appid As String) As Integer

  Shared Function SHAppBarMessage(ByVal dwMessage As Integer, ByRef pData As APPBARDATA) As Integer

    Shared Function SHAppBarMessage(ByVal dwMessage As Integer, ByRef pData As APPBARDATA) As Integer

    Shared Function GetSystemMetrics(ByVal Index As Integer) As Integer

    Private Shared Function MoveWindow(ByVal hWnd As IntPtr, ByVal x As Integer, ByVal y As Integer, ByVal cx As Integer, ByVal cy As Integer,

                       ByVal repaint As Boolean) As Boolean

    Private Shared Function RegisterWindowMessage(ByVal msg As String) As Integer

    Private Declare Auto Function FindWindow Lib "user32" ( ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr

    Set(ByVal Value As Size)

    Set(ByVal Value As ABEdge)

    Friend Sub New(ByRef DockForm As System.Windows.Forms.Form, ByVal dockStyle As AppBarDockStyle, ByVal AppBarSize As Size)

    Public Sub UpdateDockedAppBarPosition(ByVal dockStyle As AppBarDockStyle)

    Friend Sub RegisterBar(ByVal hWnd As IntPtr, ByRef uCallbackMessage As Int32, ByVal idealSize As Size, ByVal DockEdge As ABEdge)

    Friend Sub UnregisterAppBar(ByVal hWnd As IntPtr)

    Friend Sub ABSetPos(ByVal hWnd As IntPtr, ByVal idealSize As Size, ByVal DockEdge As ABEdge)

    Private Overloads Sub OnLoad(ByVal sender As Object, ByVal e As System.EventArgs)

    Private Overloads Sub OnClosing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs)

    ByVal lpifq As IntPtr, _

    ByVal pidl As IntPtr, _

    <[In](), MarshalAs(UnmanagedType.LPStruct)> ByVal riid As Guid, _