Vb6 禁用"；您将大量数据复制到剪贴板上；word 2003中的警告

此代码段（来自VB6）启动Word 2003应用程序并添加新文档：

Dim WithEvents wApp As Word.Application
Dim WithEvents wDoc As Document

Set wApp = New Application

wApp.DisplayAlerts = wdAlertsNone

Set wDoc = wApp.Documents.Add
wApp.Visible = True

情景：

我从一个简单的vb6应用程序中运行类似的代码

我复制一个大文本（即从网站上）并粘贴到新的word文档中

在将文本粘贴到同一个文档中几次后，我将其全部标记，并从Word中复制

然后我关闭word应用程序，拒绝保存文档，并在最后得到“…大量数据…”警告 我找到的所有示例都在MS Excel和MS Access案例中描述了此警告问题，因此我还没有找到任何有效的MS Word解决方案。 是的，我试图更改甚至删除注册表值

HKey_CURRENT_USER\Software\Microsoft\Office\11.0\Common\General\AcbControl

对MS Word 2003中的警告问题没有任何影响

我必须在关闭word应用程序后获取上次复制的数据，因此清除剪贴板不是一个解决方案

---

MS Word 2003是否存在忽略任何警告设置的错误，或者是否有任何方法在关闭Word 2003时禁用“您将大量数据复制到剪贴板…”警告。在“设置”或某些代码中？

我相信只有当剪贴板中有大量数据时才会出现此警告消息

因此，如果您使用代码清除剪贴板，我相信警告消息将不再显示

正如您所说，您需要在剪贴板中维护该值，因此将其临时存储在变量中，一旦关闭word文档，然后将保存的值重新分配回剪贴板

注意：Visual Basic 6中有一个剪贴板对象

---

有关如何使用Visual Basic 6剪贴板对象的文档，请参见

Word提供的某些剪贴板格式的数据仅在明确请求时提供。Word警告说，关闭时需要丢失或生成这些文件。我不知道它是否可以被禁用。

大概你想复制格式&而不仅仅是文本？当然！下一步是找到正确的剪贴板格式。使用api函数，CountClipboardFormats我有17种格式，但目前唯一接受的是1-3。1只返回文本；3以图像的形式返回剪贴板（实际上相当不错），2返回我看不到的任何内容。