在 Access2003/2007 中使用 VBA。
如何将字符串变量的内容复制到剪贴板?
This site建议创建一个零长度的文本框,将字符串复制到文本框,然后运行 DoCmd.RunCommand acCmdCopy
。啊。我的意思是,我们可以沿着这条路走下去。但还是。呃。
同时 the MS knowledgebase article向我们展示了如何执行此操作,但它涉及许多 Windows API 调用。嗯。
只有这两个选项吗?
最佳答案
VB 6 提供了一个 Clipboard
对象,使所有这些变得非常简单和方便,但不幸的是,VBA 不提供该对象。
如果是我,我会选择 API 路线。没有理由害怕调用 native API;该语言为您提供这样做的能力是有原因的。
但是,更简单的替代方法是使用 DataObject
类,它是 Forms 库的一部分。如果您已经在您的应用程序中使用 Forms 库中的功能,我只建议您走这条路。添加对该库的引用仅以使用剪贴板似乎有点愚蠢。
例如,要在剪贴板上放置一些文本,您可以使用以下代码:
Dim clipboard As MSForms.DataObject
Set clipboard = New MSForms.DataObject
clipboard.SetText "A string value"
clipboard.PutInClipboard
或者,将剪贴板中的文本复制到字符串变量中:
Dim clipboard As MSForms.DataObject
Dim strContents As String
Set clipboard = New MSForms.DataObject
clipboard.GetFromClipboard
strContents = clipboard.GetText
关于windows - 如何使用 Access/VBA 复制到剪贴板?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/5552299/