Dim i, numberOfInterfaces as Integer

    numberOfInterfaces = i

    For i = 0 to numberOfInterfaces - 1

//note that for this to work you will need to change the signature from 'int nIndex' to 'GWL nIndex' in all three places

//note that for this to work you will need to change the signature from 'int nIndex' to 'GWL nIndex' in all three places

' Purpose: stript the string from non-letter characters and replace by spaces

// Runs notepad and places it's window into form.

/// The SetProp function adds a new entry or changes an existing entry in the property list of the specified window. The function adds a new entry to the list if the specified character string does not exist already in the list. The new entry contains the string and the handle. Otherwise, the function replaces the string's current handle with the specified handle.

    ///         Places the window at the bottom of the Z order. If the hWnd parameter identifies a topmost

    ///         Places the window above all non-topmost windows (that is, behind all topmost windows). This

    ///         <term>HWND_TOP ((HWND)0)</term><description>Places the window at the top of the Z order.</description>

    ///         Places the window above all non-topmost windows. The window maintains its topmost position

        ///     Places the window at the top of the Z order.

        ///     Places the window at the bottom of the Z order. If the hWnd parameter identifies a topmost window, the window loses its topmost status and is placed at the bottom of all other windows.

        ///     Places the window above all non-topmost windows. The window maintains its topmost position even when it is deactivated.

        ///     Places the window above all non-topmost windows (that is, behind all topmost windows). This flag has no effect if the window is already a non-topmost window.

    private const int LF_FACESIZE = 32;

        /// than <see cref="LF_FACESIZE"/> including the terminating '\0'.

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

    ''' For more information, see Security Requirements for the Network Management Functions. For more information on ACLs and ACEs, see Access Control Model.

const int INTERFACESAFE_FOR_UNTRUSTED_CALLER = 0x00000001;

const int INTERFACESAFE_FOR_UNTRUSTED_DATA = 0x00000002;

    /// Retrieves the color value of the first pixel in the image and replaces the corresponding entry in the color table

    /// Searches the color table for the image and replaces the following shades of gray with the corresponding 3-D color: Color Replaced with

    ''' Retrieves the color value of the first pixel in the image and replaces the corresponding entry in the color table

    ''' Searches the color table for the image and replaces the following shades of gray with the corresponding 3-D color: Color Replaced with

    public static PropertyKey WPD_COMMAND_CLASS_EXTENSION_REGISTER_SERVICE_INTERFACES = new PropertyKey(0x7F0779B5, 0xFA2B, 0x4766, 0x9C, 0xB2, 0xF7, 0x3B, 0xA3, 0x0B, 0x67, 0x58, 2);

    public static PropertyKey WPD_COMMAND_CLASS_EXTENSION_UNREGISTER_SERVICE_INTERFACES = new PropertyKey(0x7F0779B5, 0xFA2B, 0x4766, 0x9C, 0xB2, 0xF7, 0x3B, 0xA3, 0x0B, 0x67, 0x58, 3);

    public static PropertyKey WPD_PROPERTY_CLASS_EXTENSION_SERVICE_INTERFACES = new PropertyKey(0x7F0779B5, 0xFA2B, 0x4766, 0x9C, 0xB2, 0xF7, 0x3B, 0xA3, 0x0B, 0x67, 0x58, 1002);

    public enum ColorSpaces

FSCTL constants are found in WinIoCtl.h, using CTL_CODE()function to Logical OR together FILE_DEVICE_FILE_SYSTEM (9) shifted left 16 places;

a given function number shifted left 2 places;

along with FILE_ANY_ACCESS or FILE_SPECIAL_ACCESS (both are 0) or FILE_READ_ACCESS (1), FILE_WRITE_ACCESS (2) (both are also defined in ntioapi.h as FILE_READ_DATA and FILE_WRITE_DATA), or the pair Logically ORed with one another shifted left 14 places.

        /// No interfaces have been exported.

        /// No interfaces have been registered.

        public const int RPC_S_NO_INTERFACES = 1817;

        /// Not all the requested interfaces were available

        public const int CO_S_NOTALLINTERFACES = 0x00080012;

        /// A call control interfaces was called with invalid data.

        /// Security must be initialized before any interfaces are marshalled or unmarshalled. It cannot be changed once initialized.

        /// The number of ACEs in an ACL exceeds the system limit.

        /// Not all the DENY_ACCESS ACEs are arranged in front of the GRANT_ACCESS ACEs in the stream.

        public const int CO_E_ACESINWRONGORDER = (int)(0x8001013A - 0x100000000);

        public const int COMQC_E_NO_QUEUEABLE_INTERFACES = (int)(0x80110601 - 0x100000000);

/// Searches a path for spaces. If spaces are found, the entire path is enclosed in quotation marks.

/// <returns>TRUE if spaces were found; otherwise, FALSE.</returns>

[DllImport("shlwapi.dll", EntryPoint = "PathQuoteSpacesW",  SetLastError = True, CharSet = CharSet.Unicode)]

static extern bool PathQuoteSpaces([MarshalAs(UnmanagedType.LPTStr)]System.Text.StringBuilder lpsz);

''' Searches a path for spaces. If spaces are found, the entire path is enclosed in quotation marks.

''' <returns>TRUE if spaces were found; otherwise, FALSE.</returns>

<DllImport("shlwapi.dll", EntryPoint:="PathQuoteSpacesW",  SetLastError:=True, CharSet:=CharSet.Unicode)> _

Public Function PathQuoteSpaces(<MarshalAs(UnmanagedType.LPTStr)>lpsz As System.Text.StringBuilder) As <MarshalAs(UnmanagedType.Bool)> Boolean

Public Declare Sub PathQuoteSpaces Lib "shlwapi" Alias "PathQuoteSpacesA" _

/// Removes all leading and trailing spaces from a string.

/// <param name="pszPath">A pointer to a null-terminated string of length MAX_PATH from which to strip all leading and trailing spaces.</param>

''' Removes all leading and trailing spaces from a string.

''' <param name="pszPath">A pointer to a null-terminated string of length MAX_PATH from which to strip all leading and trailing spaces.</param>

/// Replaces the extension of a file name with a new extension. If the file name does not contain an extension, the extension will be attached to the end of the string.

''' Replaces the extension of a file name with a new extension. If the file name does not contain an extension, the extension will be attached to the end of the string.

[DllImport("shlwapi.dll", EntryPoint = "PathUnQuoteSpacesW",  SetLastError = True, CharSet= CharSet.Unicode)]

static extern void PathUnQuoteSpaces([MarshalAs(UnmanagedType.LPTStr)]System.Text.StringBuilder lpsz);

<DllImport("shlwapi.dll", EntryPoint:="PathUnQuoteSpacesW",  SetLastError:=True, CharSet:=CharSet.Unicode)> _

Public Sub PathUnQuoteSpaces(<MarshalAs(UnmanagedType.LPTStr)>lpsz As System.Text.StringBuilder)

Public Declare Sub PathUnquoteSpaces Lib "shlwapi" Alias "PathUnquoteSpacesA" _

Raymond Chen, a popular Microsoft blogger, recommends that you not worry about leaving keys because it's per-user data anyway and in many environments it's preferable to leave it behind. Definitely do not try to enumerate all user profiles to remove the keys for the other users because in the case of roaming profiles you'll likely corrupt a lot of stuff. If you want to remove all traces of your program, one alternative is to write your own SHMessageBoxCheck dialog and store the preference wherever you want. Source: http://blogs.msdn.com/oldnewthing/archive/2007/09/17/4948130.aspx

As of .NET 2.0, UCOMIMoniker is obsolete and has been replaced with System.Runtime.InteropServices.ComTypes.IMoniker. This extends to all interfaces of the System.Runtime.InteropServices namespace starting with "UCOM...". Each of them are replaced in the System.Runtime.InteropServices.ComTypes namespace, with same name, except for the "UCOM" at the beginning.

As of .NET 2.0, UCOMIMoniker is obsolete and has been replaced with System.Runtime.InteropServices.ComTypes.IMoniker. This extends to all interfaces of the System.Runtime.InteropServices namespace starting with "UCOM...". Each of them are replaced in the System.Runtime.InteropServices.ComTypes namespace, with same name, except for the "UCOM" at the beginning.

        //http://henbo.spaces.live.com/blog/cns!2E073207A544E12!200.entry

        public const Int32 LF_FACESIZE = 32; // ref WinGDI.h

        public const Int32 LF_FULLFACESIZE = 64; // ref WinGDI.h

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

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

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

        public const Int32 LF_FACESIZE = 32; // ref WinGDI.h

        public const Int32 LF_FULLFACESIZE = 64; // ref WinGDI.h

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

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

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

/// The ABC spaces are measured along the character base line of the selected font.

/// The character increment (total width) of a character is the sum of the A, B, and C spaces. Either the A or

/// <summary>Selects an object into the specified device context (DC). The new object replaces the previous object of the same type.</summary>