资源描述：
《vb实现截图、复制、剪切和粘贴功能》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、'ReleaseDC函数释放设备上下文环境（DC）供其他应用程序使用PrivateDeclareFunctionReleaseDCLib"user32"(ByValhwndAsLong,ByValhdcAsLong)AsLong'OpenClipboard函数用于打开剪切板PrivateDeclareFunctionOpenClipboardLib"user32"(ByValhwndAsLong)AsLong'EmptyClipboard函数用于清空剪切板PrivateDeclareFunctionEmptyClipboard
2、Lib"user32"()AsLong'SetClipboardData函数用于把数据放到具有指定格式的剪切板，窗口必须是当前剪切板的拥有者，该函数必须在OpenClipboard调用后才可以用PrivateDeclareFunctionSetClipboardDataLib"user32"(ByValwFormatAsLong,ByValhMemAsLong)AsLong'SelectObject函数选择一对象到指定的设备上下文环境中，该新对象替换先前的相同类型的对象。PrivateDeclareFunctionSelect
3、ObjectLib"gdi32"(ByValhdcAsLong,ByValhObjectAsLong)AsLong'DeleteDC该函数删除指定的设备上下文环境（Dc）。PrivateDeclareFunctionDeleteDCLib"gdi32"(ByValhdcAsLong)AsLong'BitBlt该函数对指定的源设备环境区域中的像素进行位块（bit_block）转换，以传送到目标设备环境。PrivateDeclareFunctionBitBltLib"gdi32"(ByValhDestDCAsLong,ByValX
4、AsLong,ByValYAsLong,ByValnWidthAsLong,ByValnHeightAsLong,ByValhSrcDCAsLong,ByValxSrcAsLong,ByValySrcAsLong,ByValdwRopAsLong)AsLong'CreateCompatibleDC该函数创建一个与指定设备兼容的内存设备上下文环境（DC）。通过GetDc()获取的HDC直接与相关设备沟通，而本函数创建的DC，则是与内存中的一个表面相关联。PrivateDeclareFunctionCreateCompatible
5、DCLib"gdi32"(ByValhdcAsLong)AsLong'CreateCompatibleBitmap该函数创建与指定的设备环境相关的设备兼容的位图。PrivateDeclareFunctionCreateCompatibleBitmapLib"gdi32"(ByValhdcAsLong,ByValnWidthAsLong,ByValnHeightAsLong)AsLong'CloseClipboard关闭剪贴板,这使其他窗口能访问剪贴板PrivateDeclareFunctionCloseClipboardLib
6、"user32"()AsLong'CreateDC该函数通过使用指定的名字为一个设备创建设备上下文环境。PrivateDeclareFunctionCreateDCLib"gdi32"Alias"CreateDCA"(ByVallpDriverNameAsString,ByVallpDeviceNameAsString,ByVallpOutputAsString,lpInitDataAsLong)AsLongConstMAX_TOOLTIPAsInteger=64ConstNIF_ICON=&H2'删除图标ConstNIF_M
7、ESSAGE=&H1ConstNIF_TIP=&H4ConstNIM_ADD=&H0'添加图标到任务栏提示区ConstNIM_DELETE=&H2ConstWM_MOUSEMOVE=&H200ConstWM_LBUTTONUP=&H202ConstWM_RBUTTONUP=&H205PrivateTypeNOTIFYICONDATAcbSizeAsLonghwndAsLonguIDAsLonguFlagsAsLonguCallbackMessageAsLonghIconAsLongszTipAsString*MAX_TOOLT
8、IPEndTypePrivateDeclareFunctionGetMenuLib"user32"(ByValhwndAsLong)AsLongPrivateDeclareFunctionGetSubMenuLib"user32"(ByValhMenuAsLong,ByVal
