R &gt;= 0x0400 */
     CF_OWNERDISPLAY = &amp;H80
     CF_DSPTEXT = &amp;H81
     CF_DSPBITMAP = &amp;H82
     CF_DSPMETAFILEPICT = &amp;H83
     CF_DSPENHMETAFILE = &amp;H8E
'/*
' * "Private" formats don't get GlobalFree()'d
' */
     CF_PRIVATEFIRST = &amp;H200
     CF_PRIVATELAST = &amp;H2FF
'/*
' * "GDIOBJ" formats do get DeleteObject()'d
' */
     CF_GDIOBJFIRST = &amp;H300
     CF_GDIOBJLAST = &amp;H3FF

End Enum

' New shell-oriented clipboard formats
Private Const CFSTR_SHELLIDLIST As String = "Shel