ByRef pcbNeeded As UInt32, _

    ByRef pcReturned As UInt32) _

Declare Function EnumPrintProcessorDatatypes Lib "winspool.drv" Alias "EnumPrintProcessorDatatypesA" (ByVal pName As String, ByVal pPrintProcessorName As String, ByVal Level As Integer, ByRef pDatatypes As Byte, ByVal cdBuf As Integer, ByRef pcbNeeded As Integer, ByRef pcRetruned As Integer) As Integer

(ByVal pszBuffer As System.Text.StringBuilder, ByRef pcchBuffer As Int32) As Boolean

        ByRef phPrinter As IntPtr, _

   ByRef hPrinter As IntPtr, ByVal pDefault As PRINTER_DEFAULTS) As Boolean

   ByRef hPrinter As IntPtr, ByRef pDefault As PRINTER_DEFAULTS) As Boolean

   Level As Integer, ByRef pJob As Byte, Command_Renamed As Integer)

    Public Shared Function WritePrinter(ByVal hPrinter As IntPtr, ByVal pBytes As IntPtr, ByVal dwCount As Int32, ByRef dwWritten As Int32) As Boolean

      Sub BeforeNavigate2(<MarshalAs(UnmanagedType.IDispatch)> ByVal pDisp As Object, <In> ByRef URL As Object, <In> ByRef Flags As Object, <In> ByRef TargetFrameName As Object, <In> ByRef PostData As Object, <In> ByRef Headers As Object, <In, Out, MarshalAs(UnmanagedType.VariantBool)> ByRef Cancel As Boolean)

      Sub ClientToHostWindow(<In, Out> ByRef CX As Integer, <In, Out> ByRef CY As Integer)

      Sub DocumentComplete(<MarshalAs(UnmanagedType.IDispatch)> ByVal pDisp As Object, <In> ByRef URL As Object)

      Sub FileDownload(<In, Out, MarshalAs(UnmanagedType.VariantBool)> ByRef Cancel As Boolean)

      Sub NavigateComplete2(<MarshalAs(UnmanagedType.IDispatch)> ByVal pDisp As Object, <In> ByRef URL As Object)

      Sub NavigateError(<MarshalAs(UnmanagedType.IDispatch)> ByVal pDisp As Object, <In> ByRef URL As Object, <In> ByRef Frame As Object, <In> ByRef StatusCode As Object, <In, Out, MarshalAs(UnmanagedType.VariantBool)> ByRef Cancel As Boolean)

      Sub NewWindow2(<In, Out, MarshalAs(UnmanagedType.IDispatch)> ByRef ppDisp As Object, <In, Out, MarshalAs(UnmanagedType.VariantBool)> ByRef Cancel As Boolean)

      Sub NewWindow3(<In, Out, MarshalAs(UnmanagedType.IDispatch)> ByRef ppDisp As Object, <In, Out, MarshalAs(UnmanagedType.VariantBool)> ByRef Cancel As Boolean, ByVal dwFlags As UInt32, <MarshalAs(UnmanagedType.BStr)> ByVal bstrUrlContext As String, <MarshalAs(UnmanagedType.BStr)> ByVal bstrUrl As String)

      Sub UpdatePageStatus(<MarshalAs(UnmanagedType.IDispatch)> ByVal pDisp As Object, <In> ByRef nPage As Object, <In> ByRef fDone As Object)

      Sub WindowClosing(<MarshalAs(UnmanagedType.VariantBool)> ByVal IsChildWindow As Boolean, <In, Out, MarshalAs(UnmanagedType.VariantBool)> ByRef Cancel As Boolean)

    Function GetWallpaperOptions(ByRef pwpo As WALLPAPEROPT, ByVal dwReserved As Integer) As Integer

    Function SetWallpaperOptions(ByRef pwpo As WALLPAPEROPT, ByVal dwReserved As Integer) As Integer

    Function GetDesktopItemOptions(ByRef pco As COMPONENTSOPT, ByVal dwReserved As Integer) As Integer

    Function SetDesktopItemOptions(ByRef pco As COMPONENTSOPT, ByVal dwReserved As Integer) As Integer

    Function AddDesktopItem(ByRef pcomp As COMPONENT, ByVal dwReserved As Integer) As Integer

    Function AddDesktopItemWithUI(ByVal hwnd As IntPtr, ByRef pcomp As COMPONENT, ByVal dwFlags As DtiAddUI) As Integer

    Function ModifyDesktopItem(ByRef pcomp As COMPONENT, ByVal dwFlags As ComponentModify) As Integer

    Function RemoveDesktopItem(ByRef pcomp As COMPONENT, ByVal dwReserved As Integer) As Integer

    Function GetDesktopItemCount(<Out()> ByRef lpiCount As Integer, ByVal dwReserved As Integer) As Integer

    Function GetDesktopItem(ByVal nComponent As Integer, ByRef pcomp As COMPONENT, ByVal dwReserved As Integer) As Integer

    Function GetDesktopItemByID(ByVal dwID As IntPtr, ByRef pcomp As COMPONENT, ByVal dwReserved As Integer) As Integer

    Function GenerateDesktopItemHtml(<MarshalAs(UnmanagedType.LPWStr)> ByVal pwszFileName As String, ByRef pcomp As COMPONENT, ByVal dwReserved As Integer) As Integer

    Function AddUrl(ByVal hwnd As IntPtr, <MarshalAs(UnmanagedType.LPWStr)> ByVal pszSource As String, ByRef pcomp As COMPONENT, ByVal dwFlags As AddURL) As Integer

    Function GetDesktopItemBySource(<MarshalAs(UnmanagedType.LPWStr)> ByVal pwszSource As String, ByRef pcomp As COMPONENT, ByVal dwReserved As Integer) As Integer

    <MarshalAs(UnmanagedType.LPWStr)> ByRef string pszUsername,

    <MarshalAs(UnmanagedType.LPWStr)> ByRef string pszPassword)

    Sub GetPriority(ByRef pnPriority As Integer)

    Sub GetBindResult(ByRef pclsidProtocol As Guid, ByRef pdwResult As UInteger, <MarshalAs(UnmanagedType.LPWStr)> ByRef pszResult As String, <[In](), [Out]()> ByRef dwReserved As UInteger)

    Sub GetBandInfo(dwBandID As UInt32, dwViewMode As UInt32, ByRef pdbi As DESKBANDINFO)

    Sub CanRenderComposited(ByRef pfCanRenderComposited As Boolean)

    Sub GetCompositionState(ByRef pfCompositionEnabled As Boolean)

    ' Function ShowDeskBand(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer Implements IDeskBand2.ShowDeskBand

    ' Function HideDeskBand(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer Implements IDeskBand.HideDeskBand

    ' Function IsDeskBandShown(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer Implements IDeskBand2.IsDeskBandShown

    Public Overridable Sub GetBandInfo(dwBandID As UInt32, dwViewMode As UInt32, ByRef dbi As DESKBANDINFO) Implements IDeskBand.GetBandInfo, IDeskBand2.GetBandInfo

    Sub CanRenderComposited(ByRef pfCanRenderComposited As Boolean) Implements IDeskBand2.CanRenderComposited

    Sub GetCompositionState(ByRef pfCompositionEnabled As Boolean) Implements IDeskBand2.GetCompositionState

    Public Overridable Sub GetWindow(ByRef phwnd As System.IntPtr) Implements IDeskBand.GetWindow, IDockingWindow.GetWindow, IOleWindow.GetWindow

    Public Overridable Sub GetSite(ByRef riid As Guid, ByRef ppvSite As [Object]) Implements IObjectWithSite.GetSite

    Public Overridable Sub UIActivateIO(fActivate As Int32, ByRef Msg As MSG) Implements IInputObject.UIActivateIO

    Public Overridable Function TranslateAcceleratorIO(ByRef msg As MSG) As Int32 Implements IInputObject.TranslateAcceleratorIO

    Sub GetSite(ByRef riid As Guid, <MarshalAs(UnmanagedType.IUnknown)> ByRef ppvSite As [Object])

    Function ShowDeskBand(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer

    Function HideDeskBand(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer

    Function IsDeskBandShown(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer

    Sub GetWindow(ByRef phwnd As System.IntPtr)

    Sub GetWindow(ByRef phwnd As System.IntPtr)

    Sub GetBandInfo(dwBandID As UInt32, dwViewMode As UInt32, ByRef pdbi As DESKBANDINFO)

    Sub CanRenderComposited(ByRef pfCanRenderComposited As Boolean)

    Sub GetCompositionState(ByRef pfCompositionEnabled As Boolean)

    Sub GetWindow(ByRef phwnd As System.IntPtr)

    Sub GetBandInfo(dwBandID As UInt32, dwViewMode As UInt32, ByRef pdbi As DESKBANDINFO)

    Sub GetClassID(ByRef pClassID As Guid)

    Sub GetClassID(ByRef pClassID As Guid)

    Sub GetSizeMax(<Out> ByRef pcbSize As UInt64)

    Sub QueryService(ByRef guid As Guid, ByRef riid As Guid, <MarshalAs(UnmanagedType.[Interface])> ByRef Obj As [Object])

    Sub UIActivateIO(fActivate As Int32, ByRef msg As MSG)

    Function TranslateAcceleratorIO(ByRef msg As MSG) As Int32

    Sub GetBandInfo(dwBandID As UInt32, dwViewMode As UInt32, ByRef pdbi As DESKBANDINFO)

    Sub CanRenderComposited(ByRef pfCanRenderComposited As Boolean)

    Sub GetCompositionState(ByRef pfCompositionEnabled As Boolean)

    ' Function ShowDeskBand(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer Implements IDeskBand2.ShowDeskBand

    ' Function HideDeskBand(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer Implements IDeskBand.HideDeskBand

    ' Function IsDeskBandShown(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer Implements IDeskBand2.IsDeskBandShown

    Public Overridable Sub GetBandInfo(dwBandID As UInt32, dwViewMode As UInt32, ByRef dbi As DESKBANDINFO) Implements IDeskBand.GetBandInfo, IDeskBand2.GetBandInfo

    Sub CanRenderComposited(ByRef pfCanRenderComposited As Boolean) Implements IDeskBand2.CanRenderComposited

    Sub GetCompositionState(ByRef pfCompositionEnabled As Boolean) Implements IDeskBand2.GetCompositionState

    Public Overridable Sub GetWindow(ByRef phwnd As System.IntPtr) Implements IDeskBand.GetWindow, IDockingWindow.GetWindow, IOleWindow.GetWindow

    Public Overridable Sub GetSite(ByRef riid As Guid, ByRef ppvSite As [Object]) Implements IObjectWithSite.GetSite

    Public Overridable Sub UIActivateIO(fActivate As Int32, ByRef Msg As MSG) Implements IInputObject.UIActivateIO

    Public Overridable Function TranslateAcceleratorIO(ByRef msg As MSG) As Int32 Implements IInputObject.TranslateAcceleratorIO

    Sub GetSite(ByRef riid As Guid, <MarshalAs(UnmanagedType.IUnknown)> ByRef ppvSite As [Object])

    Function ShowDeskBand(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer

    Function HideDeskBand(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer

    Function IsDeskBandShown(<[In](), MarshalAs(UnmanagedType.Struct)> ByRef clsid As Guid) As Integer

    Sub GetWindow(ByRef phwnd As System.IntPtr)

    Sub GetWindow(ByRef phwnd As System.IntPtr)

    Sub GetBandInfo(dwBandID As UInt32, dwViewMode As UInt32, ByRef pdbi As DESKBANDINFO)

    Sub CanRenderComposited(ByRef pfCanRenderComposited As Boolean)

    Sub GetCompositionState(ByRef pfCompositionEnabled As Boolean)

    Sub GetWindow(ByRef phwnd As System.IntPtr)

    Sub GetBandInfo(dwBandID As UInt32, dwViewMode As UInt32, ByRef pdbi As DESKBANDINFO)

    Sub GetClassID(ByRef pClassID As Guid)

    Sub GetClassID(ByRef pClassID As Guid)

    Sub GetSizeMax(<Out> ByRef pcbSize As UInt64)

    Sub QueryService(ByRef guid As Guid, ByRef riid As Guid, <MarshalAs(UnmanagedType.[Interface])> ByRef Obj As [Object])

    Sub UIActivateIO(fActivate As Int32, ByRef msg As MSG)

    Function TranslateAcceleratorIO(ByRef msg As MSG) As Int32

    Function ShowMessage(ByVal hwnd As IntPtr, <MarshalAs(UnmanagedType.LPWStr)> ByVal lpstrText As String, <MarshalAs(UnmanagedType.LPWStr)> ByVal lpstrCaption As String, ByVal dwType As Integer, <MarshalAs(UnmanagedType.LPWStr)> ByVal lpstrHelpFile As String, ByVal dwHelpContext As Integer, ByRef lpResult As Integer) As Integer

   Sub GetOverrideKeyPath(<MarshalAs(UnmanagedType.BStr)> ByRef pchKey As String, dw As UInt32)

   Sub GetOverrideKeyPath(<MarshalAs(UnmanagedType.BStr)> ByRef pchKey As String, dw As UInt32)

        Function [Next](celt As Integer, <Out, MarshalAs(UnmanagedType.LPArray, SizeParamIndex := 0)> rgelt As Guid(), ByRef pceltFetched As Integer) As Integer

        Sub Clone(ByRef ppenum As IEnumGUID)

     ByRef rgelt As IntPtr, _

     ByRef pceltFetched As IntPtr) As Integer

     Function Clone(ByRef ppenum As IEnumIDList) As Integer

          ByRef piIndex As Integer, _

          ByRef pwFlags As Integer) As Integer

        ByRef pdwPriority As Integer, _

        ByRef prgSize As Win32.SIZE, _

        ByRef pdwFlags As Integer) As Integer

    Function Extract(<Out()> ByRef phBmpImage As IntPtr) As Integer

        ByRef pcwcBuffer As Integer, _

              ByRef PropVal As IntPtr _

    '    ByRef ppPropValue As IntPtr

               ByRef origPos As FILTERREGION, _

               ByRef riid As Guid, _

               ByRef ppunk As object _

    Sub GetBindInfo(<Out()> ByRef grfBINDF As UInt32, <[In](), Out()> ByRef pbindinfo As BINDINFO)

    Sub GetBindString(ByVal ulStringType As UInt32, <MarshalAs(UnmanagedType.LPWStr)> ByRef ppwzStr As String, ByVal cEl As UInt32, ByRef pcElFetched As UInt32)

    Sub Switch(ByRef pProtocolData As _tagPROTOCOLDATA)

    Sub Switch(ByRef pProtocolData As _tagPROTOCOLDATA)

       ByRef pdwZone As UInt32, ByVal dwFlags As UInt32) As <MarshalAs(UnmanagedType.I4)> Integer

        ByRef pcbSecurityId As UInt32, ByVal dwReserved As UInt32) As <MarshalAs(UnmanagedType.I4)> Integer

        ByRef guidKey As Guid, ByRef ppPolicy As Byte, ByRef pcbPolicy As UInt32,

        ByRef pContext As Byte, ByVal cbContext As UInt32, ByVal dwReserved As UInt32) As <MarshalAs(UnmanagedType.I4)> Integer

                  ByRef pZoneAttributes As ZoneAttributes) As Integer

                  ByRef pZoneAttributes As ZoneAttributes) As Integer

                <[In]()> ByRef guidKey As Guid,

                ByRef ppPolicy As IntPtr,

                ByRef pcbPolicy As UInteger,

                <[In]()> ByRef guidKey As Guid,

    Function CreateZoneEnumerator(ByRef pdwEnum As UInteger,

                 ByRef pdwCount As UInteger,

              ByRef pdwZone As UInteger) As Integer

    Sub ReadAt(ByVal ulOffset As Long, ByVal pv As IntPtr, ByVal cv As Integer, <Out()> ByRef pcbRead As Integer)

    Sub WriteAt(ByVal ulOffset As Long, ByVal pv As IntPtr, ByVal cb As Integer, <Out()> ByRef pcbWritten As Integer)

    Sub Stat(ByRef pstatstg As STATSTG, ByVal grfStatFlag As Integer)

    Sub GetSite(ByRef riid As Guid, <MarshalAs(UnmanagedType.Interface)> ByRef ppvSite As Object)

    Sub GetMoniker(ByVal dwAssign As Integer, ByVal dwWhichMoniker As Integer, ByRef ppmk As Object)

    Sub GetContainer(ByRef ppContainer As Object)

   Sub ActivateMe(ByRef pViewToActivate As Object)

      Sub GetWindow(<System.Runtime.InteropServices.Out()> ByRef phwnd As IntPtr)

    Sub GetCount(ByRef cProps As UInt32)

    Sub GetAt(ByVal iProp As UInt32, ByRef pkey As NativeMethods.PROPERTYKEY)

    Sub GetValue(ByRef key As NativeMethods.PROPERTYKEY, ByRef pv As Object)

    Sub SetValue(ByRef key As NativeMethods.PROPERTYKEY, ByRef pv As Object)

    Sub QueryService(ByRef guidService As Guid, ByRef riid As Guid,

    <MarshalAs(UnmanagedType.Interface)> ByRef ppvObject As Object)

        Sub GetImage(ByVal size As SIZE, ByVal flags As SIIGBF, ByRef phbm As IntPtr)

    Function BindToHandler(<[In](), MarshalAs(UnmanagedType.[Interface])> pbc As IntPtr, <[In]()> rbhid As Guid, <[In]()> riid As Guid, ByRef ppvOut As IntPtr) As Integer

    Function GetPropertyStore(<[In]()> Flags As Integer, <[In]()> riid As Guid, ByRef ppv As IntPtr) As Integer

    Function GetPropertyDescriptionList(<[In]()> keyType As PROPERTYKEY, <[In]()> riid As Guid, ByRef ppv As IntPtr) As Integer

    Function GetAttributes(<[In]()> dwAttribFlags As SIATTRIBFLAGS, <[In]()> sfgaoMask As SFGAO, ByRef psfgaoAttribs As SFGAO) As Integer

    Function GetCount(ByRef pdwNumItems As UInteger) As Integer

    Function GetItemAt(<[In]()> dwIndex As UInteger, <MarshalAs(UnmanagedType.[Interface])> ByRef ppsi As IShellItem) As Integer

    Function EnumItems(<MarshalAs(UnmanagedType.[Interface])> ByRef ppenumShellItems As IEnumShellItems) As Integer

        Sub GetImage(ByVal size As SIZE, ByVal flags As SIIGBF, ByRef phbm As IntPtr)

    Sub GetPath(<Out(), MarshalAs(UnmanagedType.LPStr)> ByVal pszFile As StringBuilder, ByVal cchMaxPath As Integer, ByRef pfd As WIN32_FIND_DATAA, ByVal fFlags As UInteger)

    Sub GetIDList(ByRef ppidl As IntPtr)

    Sub GetHotkey(ByRef pwHotkey As Short)

    Sub GetShowCmd(ByRef piShowCmd As UInteger)

    Sub GetIconLocation(<Out(), MarshalAs(UnmanagedType.LPStr)> ByVal pszIconPath As StringBuilder, ByVal cchIconPath As Integer, ByRef piIcon As Integer)

            ByRef pfd As WIN32_FIND_DATA, _

    <PreserveSig()> Function GetIDList(ByRef ppidl As IntPtr) As HRESULT

    <PreserveSig()> Function GetHotkey(ByRef pwHotkey As Short) As HRESULT

    <PreserveSig()> Function GetShowCmd(ByRef piShowCmd As Integer) As HRESULT

            ByRef piIcon As Integer) As HRESULT

                     ByRef ppstm As IStream)

                   ByRef ppstm As IStream)

                      ByRef ppstg As IStorage)

                    ByRef ppstg As IStorage)

                     ByRef ppenum As IEnumSTATSTG)

    Sub Stat(ByRef pstatstg As STATSTG,

        Sub GetThumbnail(cx As Integer, ByRef phbmp As IntPtr, ByRef pdwAlpha As WTS_ALPHATYPE)

    <Out(), MarshalAs(UnmanagedType.Interface)> ByRef rgElt As ITravelLogEntry, _

    <Out(), MarshalAs(UnmanagedType.U4)> ByRef pcEltFetched As Integer) As Integer

    Function Clone(<Out(), MarshalAs(UnmanagedType.Interface)> ByRef ppEnum As IEnumTravelLogEntry) As Integer

    <Out(), MarshalAs(UnmanagedType.Interface)> ByRef pptle As ITravelLogEntry) As Integer

    <Out(), MarshalAs(UnmanagedType.Interface)> ByRef ppenum As IEnumTravelLogEntry) As Integer

    <Out(), MarshalAs(UnmanagedType.Interface)> ByRef ppenum As IEnumTravelLogEntry) As Integer

    <Out(), MarshalAs(UnmanagedType.U4)> ByRef pcEntries As Integer) As Integer

    <Out(), MarshalAs(UnmanagedType.Interface)> ByRef ptle As ITravelLogEntry) As Integer

     Function QueryInterface(ByRef riid As Guid) As IntPtr

    Sub Draw(<MarshalAs(UnmanagedType.U4)> ByVal dwDrawAspect As UInt32, ByVal lindex As Integer, ByVal pvAspect As IntPtr, <[In]()> ByVal ptd As IntPtr, ByVal hdcTargetDev As IntPtr, ByVal hdcDraw As IntPtr, <MarshalAs(UnmanagedType.Struct)> ByRef lprcBounds As _RECTL, <[In]()> ByVal lprcWBounds As IntPtr, ByVal pfnContinue As IntPtr, <MarshalAs(UnmanagedType.U4)> ByVal dwContinue As UInt32)

    Sub GetColorSet(<[In]()> ByVal dwDrawAspect As UInteger, <[In]()> ByVal lindex As Integer, <[In]()> ByVal pvAspect As UInteger, <[In]()> ByRef ptd As tagDVTARGETDEVICE, <[In]()> ByVal hicTargetDev As UInteger, <Out()> ByVal ppColorSet As IntPtr)

    Sub Freeze(<[In]()> ByVal dwDrawAspect As UInteger, <[In]()> ByVal lindex As Integer, <[In]()> ByVal pvAspect As UInteger, ByRef pdwFreeze As UInteger)

    Sub GetAdvise(ByRef pAspects As UInteger, ByRef pAdvf As UInteger, <MarshalAs(UnmanagedType.[Interface])> ByRef ppAdvSink As IAdviseSink)

    Sub ClientToWindow(<[In](), Out()> ByRef pcx As Integer, <[In](), Out()> ByRef pcy As Integer)

    Sub ExecWB(ByVal cmdID As OLECMDID, ByVal cmdexecopt As OLECMDEXECOPT, <[In]()> ByRef pvaIn As Object, <[In](), Out()> ByRef pvaOut As Object)

    Sub Navigate(<MarshalAs(UnmanagedType.BStr)> ByVal URL As String, <[In]()> ByRef Flags As Object, <[In]()> ByRef TargetFrameName As Object, <[In]()> ByRef PostData As Object, <[In]()> ByRef Headers As Object)

    Sub Navigate2(<[In]()> ByRef URL As Object, <[In]()> ByRef Flags As Object, <[In]()> ByRef TargetFrameName As Object, <[In]()> ByRef PostData As Object, <[In]()> ByRef Headers As Object)

    Sub Refresh2(<[In]()> ByRef Level As Object)

    Sub ShowBrowserBar(<[In]()> ByRef pvaClsid As Object, <[In]()> ByRef pvarShow As Object, <[In]()> ByRef pvarSize As Object)

    Sub ClientToWindow(<[In](), Out()> ByRef pcx As Integer, <[In](), Out()> ByRef pcy As Integer)

    Sub ExecWB(ByVal cmdID As OLECMDID, ByVal cmdexecopt As OLECMDEXECOPT, <[In]()> ByRef pvaIn As Object, <[In](), Out()> ByRef pvaOut As Object)

    Sub Navigate(<MarshalAs(UnmanagedType.BStr)> ByVal URL As String, <[In]()> ByRef Flags As Object, <[In]()> ByRef TargetFrameName As Object, <[In]()> ByRef PostData As Object, <[In]()> ByRef Headers As Object)

    Sub Navigate2(<[In]()> ByRef URL As Object, <[In]()> ByRef Flags As Object, <[In]()> ByRef TargetFrameName As Object, <[In]()> ByRef PostData As Object, <[In]()> ByRef Headers As Object)

    Sub Refresh2(<[In]()> ByRef Level As Object)

    Sub ShowBrowserBar(<[In]()> ByRef pvaClsid As Object, <[In]()> ByRef pvarShow As Object, <[In]()> ByRef pvarSize As Object)

    Public Shared Function EnableRouter(pHandle As IntPtr, ByRef pOverlapped As OVERLAPPED) As Integer

    Public Shared Function EnableRouter(pHandle As IntPtr, ByRef pOverlapped As OVERLAPPED) As Integer

     ByRef pBufOutLen As UInt64) As Int32

Public Shared Function GetExtendedTcpTable(ByVal pTcpTable As IntPtr, ByRef dwOutBufLen As Integer, ByVal sort As Boolean, ByVal ipVersion As  Integer, ByVal tblClass As TCP_TABLE_CLASS, ByVal reserved As Integer) As UInteger

GetIpAddrTable Lib "iphlpapi.dll" (ByRef ipTable As IntPtr, ByRef tableSize As IntPtr, ByVal ordered As Boolean) As UInt32

    Private Shared Function GetIpNetTable(pIpNetTable As IntPtr, <MarshalAs(UnmanagedType.U4)> ByRef pdwSize As Integer, bOrder As Boolean) As <MarshalAs(UnmanagedType.U4)> Integer

    Public Shared Function GetNetworkParams(pFixedInfo As IntPtr, ByRef pBufOutLen As Integer) As Integer

    Private Shared Function GetNetworkParams(pFixedInfo As IntPtr, ByRef pBufOutLen As Integer) As Integer

      ByVal pMacAddr As Byte(), ByRef PhyAddrLen As Integer) As Integer

    Public Shared Function UnenableRouter(pOverlapped As IntPtr, ByRef lpdwEnableCount As Long) As Integer

    Public Shared Function UnenableRouter(pOverlapped As IntPtr, ByRef lpdwEnableCount As Long) As Integer

                               ByRef ppIUnk As IFilter) As Integer

   Private Shared Function gsapi_new_instance(ByRef pinstance As System.IntPtr, ByVal handle As System.IntPtr) As Integer

    Declare Auto Function gsapi_revision Lib "gsdll32.dll" (ByRef pVer As GSVersion, ByVal pSize As Integer) As Integer

    (ByRef lpVersionInformation As OSVERSIONINFOEX) As Boolean

Private Shared Function BackupRead(hFile As IntPtr, lpBuffer As IntPtr, nNumberOfBytesToRead As UInteger, ByRef lpNumberOfBytesRead As UInteger, bAbort As Boolean,    bProcessSecurity As Boolean, _

    ByRef lpContext As IntPtr) As Boolean

     ByVal lpData As IntPtr, ByRef pbCancel As Boolean, _

        ByVal lpData As IntPtr, ByRef pbCancel As Boolean, _

     ByVal lpData As IntPtr, ByRef pbCancel As Boolean, _

        ByVal lpData As IntPtr, ByRef pbCancel As Boolean, _