EnableMenuItem در VB

(WndProc(ref Message m

    if  m.Msg = WM_INITMENUPOPUP

  (((int)m.LParam & 0x10000) != 0) 

   (EnableMenuItem(WParam,SC_MOVE,MF_DISABLED

End If