怎样获取当前剪贴版中的内容？

Question

由于软件项目的需要检测剪贴版的内容，根据剪贴版的内容来做相应的操作。
怎样实现此功能？请回复！

Answer 1

Private Sub Command1_Click()
    If Clipboard.GetFormat(vbCFBitmap) Then
        '
    ElseIf Clipboard.GetFormat(vbCFText) Then
        '
    Else
        '
    End If
End Sub参考MSDN,找剪贴板就好了

Answer 2

提供对系统 Clipboard 的访问。语法Clipboard说明Clipboard 对象用于操作剪贴板上的文本和图形。它使用户能够复制、剪切和粘贴应用程序中的文本和图形。在复制任何信息到 Clipboard 对象中之前，应使用 Clear 方法清除 Clipboard 对象中的内容，例如 Clipboard.Clear。注意所有 Windows 应用程序共享 Clipboard 对象，因此当切换到其它应用程序时，剪贴板内容会改变。Clipboard 对象可包含多段数据，只要每段数据的格式不同。例如，可用 SetData 方法把位图以 vbCFDIB 格式放到 Clipboard 中，接着再用 SetText 方法以 vbCFText 格式将文本放到 Clipboard 中。然后用 GetText 方法检索文本或用 GetData 方法检索图形。当用代码或菜单命令把另一段数据放到 Clipboard 中时，原 Clipboard 中相同格式的数据会丢失。
=====================================================================
GetFormat 方法
      返回一个整数，指出 Clipboard 对象中的项目是否匹配期望的格式。不支持命名参数。语法object.GetFormat (format)GetFormat 方法的语法包含下列部分：部分 描述 
object 必需的。一个对象表达式，其值为“应用于”列表中的一个对象。 
format  必需的。一个数值或常数，如“设置值”中所描述的，它指定 Clipboard 对象的格式。必须用括号包括该常数或数值。 
设置值用于 format 的设置值有：常数 值 描述 
vbCFLink &HBF00 DDE对话信息 
vbCFText 1 文本 
vbCFBitmap 2 位图（.bmp 文件） 
vbCFMetafile 3 元文件（.wmf 文件) 
vbCFDIB 8 设备无关位图 (DIB) 
vbCFPalette 9 调色板 
说明上述常数在 Visual Basic (VB) 对象浏览器中的对象库里列出。如果 Clipboard 对象中一个项目匹配指定的格式，则 GetFormat 方法返回 True。否则，返回 False。对于 vbCFDIB 和 vbCFBitmap 两种格式，显示图形时不管 Clipboard 中是什么样的调色板都要使用。
==================================================
GetData 方法
      用于从 Clipboard 对象返回一个图形。不支持命名参数。语法object.GetData (format)GetData 方法的语法包含下列部分：部分 描述 
object 必需的。一个对象表达式，其值为“应用于”列表中的一个对象。 
format  可选的。一个常数或数值，如“设置值”中所描述的，它指定 Clipboard 图形的格式。必须用括号将该常数或数值括起来。如果 format 为 0 或省略，GetData 自动使用适当的格式。 
设置值format 的设置值有：常数 值 描述 
vbCFBitmap 2 位图（.bmp文件） 
vbCFMetafile 3 元文件（.wmf文件) 
vbCFDIB 8 设备无关位图 (DIB) 
vbCFPalette 9 调色板 
说明上述常数在 Visual Basic (VB) 对象浏览器中的对象库里列出。如果 Clipboard 对象没有与期望的格式相匹配的图形，则返回空。如果 Clipboard 对象中只有一个调色版，则创建最小尺寸 (1x1) 的 DIB。
=========================================================
GetText 方法
      用于返回 Clipboard 对象中的文本字符串。不支持命名参数。语法object.GetText (format)GetText 方法的语法包含下列部分：部分 描述 
object 必需的。一个对象表达式，其值为“应用于”列表中的一个对象。 
format  可选的。一个数值或常数，如“设置值”中所描述的，它指定 Clipboard 对象的格式。必须用括号将常数或数值括起来。 
设置值format 的设置值有： 常数 值 描述 
vbCFLink &HBF00 DDE 对话信息  
vbCFText 1 （缺省值）文本 
vbCFRTF &HBF01 RTF（.rtf 文件） 
说明上述常数在 Visual Basic (VB)对象浏览器中的对象库里列出。如果 Clipboard 对象中没有与期望的格式相匹配的字符串，则返回一个零长度字符串 ("")。