if (m.Msg == MM_MCINOTIFY)

     MsgBox(returnstring)

     If m.Msg = MM_MCINOTIFY Then

     MsgBox("Done playing.")

static extern uint midiOutShortMsg(IntPtr hMidiOut, uint dwMsg);

Declare Function midiOutShortMsg Lib "winmm.dll" (hMidiOut As Intptr,dwMsg As UInt32) As UInt32

uint msg = BitConverter.ToUInt32(data, 0);

midiOutShortMsg(hmidi, msg);

msg = BitConverter.ToUInt32(data, 0);

midiOutShortMsg(hmidi, msg);

    delegate void TimerCallback(uint uTimerID, uint uMsg, UIntPtr dwUser, UIntPtr dw1, UIntPtr dw2);

    void CBFunc(uint uTimerID, uint uMsg, UIntPtr dwUser, UIntPtr dw1, UIntPtr dw2)

delegate void waveInProc(IntPtr hwi, WIMMessages uMsg, IntPtr dwInstance, IntPtr dwParam1, IntPtr dwParam2);

Delegate Sub waveInProc(<MarshalAs(UnmanagedType.I4)> ByVal hwi As Integer, ByVal uMsg As WIMMessages, ByVal dwInstance As UIntPtr, ByVal dwParam1 As UIntPtr, ByVal dwParam2 As UIntPtr)

     MsgBox("Number of Wave Devices: " & waveOutGetNumDevs(), , "WAVE DEVICES")

         MsgBox("MID = " & wc.wMid & Chr(13) & "PID = " & wc.wPid & Chr(13) & "Version = " & _

       waveOutGetErrorText(MMRESULT, errmsg, MAXERRORLENGTH);

       "waveOutPrepareHeader(): " + errmsg.ToString(),

        waveOutGetErrorText(MMRESULT, errmsg, MAXERRORLENGTH);

        "waveOutReset(): " + errmsg.ToString(),

static extern TwRC DSMparent( [In, Out] TwIdentity origin, IntPtr zeroptr, TwDG dg, TwDAT dat, TwMSG msg, ref IntPtr refptr );

        MsgBox("Network not found!")

static extern int BroadcastSystemMessageEx(uint flags, ref uint lpInfo, uint Msg, [MarshalAs(UnmanagedType.SysUInt)] ulong wParam, [MarshalAs(UnmanagedType.SysInt)] long lParam, out BSMINFO pbsmInfo);

static extern bool show CallMsgFilter([In] ref MSG lpMsg, int nCode);

Shared Function Show CallMsgFilter(<[In]> ByRef lpMsg As MSG, nCode As Integer) As Boolean

MSG

static extern IntPtr CallWindowProc(WndProcDelegate lpPrevWndFunc, IntPtr hWnd, uint Msg, IntPtr wParam, IntPtr lParam);

Private Shared Function CallWindowProc(lpPrevWndFunc As WndProcDelegate, hWnd As IntPtr, Msg As UInteger, wParam As IntPtr, lParam As IntPtr) As IntPtr

public static extern bool ChangeWindowMessageFilterEx(IntPtr hWnd, uint msg, ChangeWindowMessageFilterExAction action,ref CHANGEFILTERSTRUCT changeInfo);

Private Shared Function ChangeWindowMessageFilterEx(hWnd As IntPtr, msg As UInteger, action As ChangeWindowMessageFilterExAction, ByRef changeInfo As CHANGEFILTERSTRUCT) As <MarshalAs(UnmanagedType.Bool)> Boolean

            MSG msg;

            while (Win32.GetMessage( out msg, IntPtr.Zero, 0, 0) != 0)

                Win32.TranslateMessage( ref msg);

                Win32.DispatchMessage( ref msg);

static extern IntPtr DefWindowProc(IntPtr hWnd, WindowsMessages uMsg, IntPtr wParam, IntPtr lParam);

Public Shared Function DefWindowProc(ByVal hWnd As IntPtr, ByVal uMsg As WindowsMessages, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As IntPtr

static extern IntPtr DispatchMessage([In] ref MSG lpmsg);

     ByRef lpmsg As MSG) As IntPtr

    static extern bool PostMessage(IntPtr hWnd, uint Msg, IntPtr wParam, IntPtr lParam);

   Shared Function PostMessage(hWnd As IntPtr, Msg As UInteger, wParam As IntPtr, lParam As IntPtr) As<MarshalAs(UnmanagedType.Bool)> Boolean

private delegate IntPtr GetMsgProc(int code, IntPtr wParam, IntPtr lParam);

Declare Function GetMsgProc Lib "user32.dll" (TODO) As TODO

This is wrong. There is no GetMsgProc in user32. GetMsgProc is a callout signature.

        if (m.Msg == (int)WindowMessages.RawInput)  // WindowMessages.RawInput = 0x00FF (WM_INPUT)

static extern int MessageBoxIndirect([In] ref MSGBOXPARAMS lpMsgBoxParams);

static extern uint MsgWaitForMultipleObjectsEx(uint nCount, IntPtr [] pHandles,

    Private Declare Function MsgWaitForMultipleObjects Lib "User32.dll" ( _

        Select Case MsgWaitForMultipleObjects(1, arrHandles, 1, waitInterval, QS_ALLEVENTS)

            Dim errMsg As String = New System.ComponentModel.Win32Exception(errorCode).Message

            Throw New Exception(errMsg)

    private static extern int MsgWaitForMultipleObjectsEx(

static extern uint MsgWaitForMultipleObjectsEx(uint nCount, IntPtr [] pHandles,

    Private Declare Function MsgWaitForMultipleObjects Lib "User32.dll" ( _

        Select Case MsgWaitForMultipleObjects(1, arrHandles, 1, waitInterval, QS_ALLEVENTS)

            Dim errMsg As String = New System.ComponentModel.Win32Exception(errorCode).Message

            Throw New Exception(errMsg)

      public uint msg;

      Public msg As UInteger

static extern bool PeekMessage(out NativeMessage lpMsg, HandleRef hWnd, uint wMsgFilterMin,

   uint wMsgFilterMax, uint wRemoveMsg);

NativeMessage msg = new NativeMessage();

GCHandle handle = GCHandle.Alloc(msg);

bool foundMessage = PeekMessage(ref msg, hWnd, 0, 0, 0);

  NativeMessage msg;

  bool foundMessage = PeekMessage(out msg, IntPtr.Zero, 0, 0, 0);

static extern bool PostMessage(HandleRef hWnd, uint Msg, IntPtr wParam, IntPtr lParam);

Private Shared Function PostMessage(ByVal hWnd As IntPtr, ByVal Msg As UInteger, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As Boolean

class method PostMessage(hWnd: IntPtr; Msg: UInt32; wParam, lParam: IntPtr): Boolean; external;

    void PostMessageSafe( HandleRef hWnd, uint msg, IntPtr wParam, IntPtr lParam )

        bool returnValue = PostMessage( hWnd, msg, wParam, lParam );

public static extern bool PostThreadMessage(uint threadId, uint msg, UIntPtr wParam, IntPtr lParam);

Public Shared Function PostThreadMessage(ByVal id As Integer, ByVal msg As Integer, ByVal wparam As IntPtr, ByVal lparam As IntPtr) As Integer

Friend Shared Function PostThreadMessage(ByVal idThread As UInt32, ByVal msg As UInt32, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As Boolean

        MsgBox("an error occured")

        MsgBox("Class atom: " & rVal.ToString & vbCrLf & _

        MsgBox("Unregister Class Sucessfuly")

        MsgBox("Unregister Class Failed")

    private static IntPtr WndProc(IntPtr hwnd, int msg, IntPtr wParam, IntPtr lParam, ref bool handled)

        if (msg == WM_POWERBROADCAST && wParam.ToInt32() == PBT_POWERSETTINGCHANGE)

/// <param name="msg">C++ ( lpString [in]. Type: LPCTSTR )<br /> The message to be registered.</param>

///      if ((UInt32)m.Msg == queryCancelAutoPlay)

    lngWindowMsg = RegisterWindowMessage(StrPtr(strMessageToRegister))

lMsg = Win32.RegisterWindowMessage("WM_HTML_GETOBJECT");

Win32.SendMessageTimeout(windowHandle, lMsg, IntPtr.Zero, IntPtr.Zero, SendMessageTimeoutFlags.SMTO_ABORT_IF_HUNG, 1000, out lRes);

    if ((UInt32)m.Msg == queryCancelAutoPlay)

            ByVal Msg As UInteger,

private static extern int SendMessage(IntPtr hWnd, int msg , int wParam , ref int lParam);

      UInt32 wMsg,

        UInt32 wMsg,

        UInt32 wMsg,

static extern IntPtr SendDlgItemMessage(IntPtr hDlg, int nIDDlgItem, uint Msg,

                        ByVal Msg As UInteger, _

                               ByVal Msg As UInteger, _

    uint Msg,

    uint Msg,

    int Msg,              // Use WM_GETTEXT

    uint Msg,

Public Sub SendMessageTimeout(ByVal windowHandle As IntPtr,ByVal Msg As Integer,ByVal wParam As IntPtr,ByVal lParam As IntPtr,ByVal flags As SendMessageTimeoutFlags,ByVal timeout As Integer,ByRef result As IntPtr)

Public Shared Function SendMessageTimeout(ByVal windowHandle As IntPtr, ByVal Msg As Integer, ByVal wParam As IntPtr, ByVal lParam As IntPtr, ByVal flags As SendMessageTimeoutFlags, ByVal timeout As Integer, ByRef result As IntPtr) As IntPtr

lMsg = Win32.RegisterWindowMessage("WM_HTML_GETOBJECT");

Win32.SendMessageTimeout(windowHandle, lMsg, IntPtr.Zero, IntPtr.Zero, SendMessageTimeoutFlags.SMTO_ABORT_IF_HUNG, 1000, out lRes);

static extern bool SendMessageCallback(IntPtr hWnd, uint Msg, UIntPtr wParam,

delegate void SendMessageDelegate(IntPtr hWnd, uint uMsg, UIntPtr dwData, IntPtr lResult);

    uint Msg,

    uint Msg,

    int Msg,              // Use WM_GETTEXT

Public Sub SendMessageTimeout(ByVal windowHandle As IntPtr,ByVal Msg As Integer,ByVal wParam As IntPtr,ByVal lParam As IntPtr,ByVal flags As SendMessageTimeoutFlags,ByVal timeout As Integer,ByRef result As IntPtr)

Public Shared Function SendMessageTimeout(ByVal windowHandle As IntPtr, ByVal Msg As Integer, ByVal wParam As IntPtr, ByVal lParam As IntPtr, ByVal flags As SendMessageTimeoutFlags, ByVal timeout As Integer, ByRef result As IntPtr) As IntPtr

lMsg = Win32.RegisterWindowMessage("WM_HTML_GETOBJECT");

Win32.SendMessageTimeout(windowHandle, lMsg, IntPtr.Zero, IntPtr.Zero, SendMessageTimeoutFlags.SMTO_ABORT_IF_HUNG, 1000, out lRes);

static extern bool SendNotifyMessage(IntPtr hWnd, uint Msg, UIntPtr wParam,

     ByVal msg As UInteger, _

    ByVal Msg As Integer, _

    static extern int SendMessage(IntPtr hWnd, int Msg, IntPtr wParam, IntPtr lParam);

        switch(m.Msg)

            SendMessage(hWndNextWindow, m.Msg, m.WParam, m.LParam);

            SendMessage(hWndNextWindow, m.Msg, m.WParam, m.LParam);

    static extern IntPtr SendMessage(IntPtr hWnd, UInt32 Msg, int wParam, int lParam);

delegate void TimerProc(IntPtr hWnd, uint uMsg, IntPtr nIDEvent, uint dwTime);

Public Delegate Sub TimerProc(ByVal hWnd As IntPtr, ByVal uMsg As UInteger, ByVal nIDEvent As IntPtr, ByVal dwTime As UInteger)

///         information, see the GetMsgProc hook procedure.

///         <term>WH_MSGFILTER (-1)</term>

///         <term>WH_SYSMSGFILTER (6)</term><description></description>

///         <term>WH_MSGFILTER (-1)</term>

///         <term>WH_SYSMSGFILTER (6)</term>

static extern TODO SysMSGProc(TODO);

Declare Function SysMSGProc Lib "user32.dll" (TODO) As TODO

static extern bool TranslateMessage([In] ref MSG lpMsg);

     ByRef lpMsg As MSG) As <MarshalAs(UnmanagedType.Bool)> Boolean

         (byref lpMsg As MSG) As Long

     public struct MSG

        MSG myMsg = new MSG();

        while (WindowsAPIs.GetMessage(out msg, IntPtr.Zero, 0, 0) && ! FOO_EXPRESSION )

        if(msg.message != FILTERED_MESSAGE)

            WindowsAPIs.TranslateMessage(ref msg);

            WindowsAPIs.DispatchMessage(ref msg);

    MsgBox("an error occured")

    MsgBox("Class atom: " & rVal.ToString & vbCrLf & _

    MsgBox("Unregister Class Sucessfuly")

    MsgBox("Unregister Class Failed")

        Select Case m.Msg

            if (m.Msg == WindowsShell.WM_HOTKEY)

delegate IntPtr WndProcDelegate(IntPtr hWnd, uint msg, IntPtr wParam, IntPtr lParam);

Delegate Function WndProcDelegate(Byval hWnd As IntPtr, Byval msg As UInteger, Byval wParam As IntPtr, Byval lParam As IntPtr) As IntPtr

                string msg  = GetError(IntPtr.Zero) + "\nconnection string:\n\t" + connstr;

                throw new Exception(msg);

        StringBuilder msg   = new StringBuilder(256);

            msg,

            (short) msg.Capacity,

            string err = msg.ToString();

   StringBuilder errorMsg, short errorMsgMax, out short errorMsgLength);

    ByVal errorMsg As Text.StringBuilder, ByVal errorMsgMax As Short, ByRef errorMsgLength As Short) As Short

            if (m.Msg == WM_WTSSESSION_CHANGE)

    String msg = "Terminal Service!";

    int mlen = msg.Length;

    result = WTSSendMessage(WTS_CURRENT_SERVER_HANDLE, WTS_CURRENT_SESSION, title, tlen, msg, mlen, 0, 0, out resp, false);

uç¼ÏxÑTPº{Û-Ðñg5ia&‡h­ÛkÁ3ÏÖs±e˱ÛÝDúþvC€ÿ†£NºÍ‰K Þ7›IºçªímSG¿øÅòq•ô}©Ú?ËÊ¿‡óËðÉ䯝þË×Óҙ¬–» êµc~KY¸¬\6<¦6oîêú^{ýl¯ù÷›P–›´¢‰ªî»EZQ£€TÁñpR†M.w\ρ‡,[Z|¢”I¾öŠåÕ+’–1!ð]«Ù’¡ÑXvmbZ}ÚºÇúI¶*"ÄZøY7MÄRÀ:æYøjŽ¼x€¸@ù(ãM˺§Õ%ÔóØötp¤Ð!$8}F

ëK®uWВ6µÊîóRQó”ÄÖ1¯¥äYe‹† h2H{}bckNåðN=|¸Ð:n÷IòÕ–5#ÖTõ4vÉ*®²ªŸ_{-Â0áÞHm6Ý"{²ÎœÊUpz93†z±ïjZ*…g;ˆ`8ÛjMâD<X>“#ñÑaDV¡d/ǾÿNF`v•ª/×LÓ]}åÐEHH?fæðh€²QØzCÙ4 ËMSgŒr®@íϲ±„«[JUñgWëŽ:½Xı„kUA‘5íçÔ{¿‘Ü<Â̝{
å*<g"èIK(žÏ“›&ôàCÍÜD½oRkS[Šª(æ#½wc¹A÷ôŒ. 7êéYÒ0~{‹FµâýÊdE´£™e!ðO.MëÙ´ñFK„Sâԋ¡é8daæt:w7‰‘ªN –Øäo³˜‚‘±}s’„¢­éá`ERò%ÚÏTû !ìýöù¬4¯ÛþÚ€[#(í`°2óøÞòâçÓjª$+ðÜ;»ÄM¹ó^Õòöa#ÚJ,4n¾
Hb
6I2‚¾KL%Á«J;ïYž²2”×.˜ú˜„rPÓÎFÿúÀä,TÕ/çQsÌ¢½\h­Dðµšûq 8$®*Ã~ÞF8ÒQ……‚1ëw †{”Ú·ÿ@f¹kOÔËÞÞw@긽/¾äT!

        'MsgBox(ex.ToString)

        'MsgBox(ex.ToString)

        System.Text.StringBuilder sbMsg = new System.Text.StringBuilder(1024);

        if (FormatMessage(FormatMessageFlags.FORMAT_MESSAGE_FROM_SYSTEM, IntPtr.Zero, win32ErrorCode, 0, sbMsg, sbMsg.Capacity, null) != 0)

        return sbMsg.ToString();

      MsgBox("NumLock is off")

      MsgBox("NumLock is on")

            switch(m.Msg)

ůSߞÕ5ïÑÚÖOí_¢A“ÿ ŠÇ(ܜý!Ã荻è‰÷´ã­ŸŠðÍg9Z&ŽÑNÍ
çÅ@Ɂ¶Î8˜Ø£¦¦â>be$¯çæäüMqQ$Ò¢>³h‚7Õ]<´H6çMI¹›Rªì?-Mè¶FŒyð„Š1ôšö*]Ä6éêÛAš_{­ó³¬W[©M•®j]¼°XG#iø3ŽGSó®œ8îyó‚¤2½8‚÷ˆ5ægˆyð‰pÔ±¶Án­;µ\nÊIMsgi¿g A‹¨x†jž'9F*¼Æ0€»ìö¡¸/ Þ$Ïc“„}ä/ÈðAp')Äâ

private static extern IntPtr SendMessage(IntPtr hWnd, int Msg, IntPtr wParam, IntPtr lParam);

Declare Function SendMessage Lib "coredll.dll" (ByVal hWnd As IntPtr, ByVal Msg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As IntPtr

    public static extern int SendMessage(IntPtr hWnd, WM Msg, int wParam, int lParam);

    public static extern int SendMessage(IntPtr hWnd, WM Msg, int wParam, int lParam);

    static extern int SendMessage(IntPtr hWnd, int wMsg, int wParam, int lParam);

    uint uMsg,  // Win32 type UINT

    // values for waveInProc.uMsg

        [PreserveSig] int HandleMenuMsg2( uint uMsg, uint wParam, uint lParam, IntPtr plResult );

Make sure your object explicitly lists all the IContextMenu interfaces or the shell may never call IContextMenu3.HandleMenuMsg2. For example:

    int HandleMenuMsg(uint uMsg, IntPtr wParam, IntPtr lParam);

        [PreserveSig] int HandleMenuMsg2( uint uMsg, uint wParam, uint lParam, IntPtr plResult );