在VB6中，要获取剪贴板中的数据格式，可以使用Clipboard.GetFormat方法。该方法返回一个整数值，用于表示当前剪贴板中的数据格式。

以下是一个示例代码，展示了如何使用Clipboard.GetFormat方法获取剪贴板中的数据格式：

Dim format As Integer
format = Clipboard.GetFormat()

在上述示例中，我们通过调用Clipboard.GetFormat方法将剪贴板中的数据格式保存到整数变量format中。

请注意，剪贴板中的数据格式是以另一种整数值来表示的。例如，常见的数据格式如下：

文本：CF_TEXT（1）

图像：CF_BITMAP（2）或CF_DIB（8）

文件列表：CF_HDROP（15）

你可以使用这些常量来与format变量进行比较，以确定剪贴板中的具体数据格式。

需要注意的是，使用剪贴板前应先确保已经打开，并且其中存在可用的数据。否则，将会引发异常错误。因此，在调用Clipboard.GetFormat之前，建议先使用Clipboard.Open方法打开剪贴板，并在操作完成后使用Clipboard.Close方法关闭剪贴板。

希望这能帮助到你！如果还有其他问题，请随时提问。