在 Access 2003/2007 中使用 VBA。
如何将字符串变量的内容复制到剪贴板?
这个网站建议创建一个零长度的文本框,将字符串复制到文本框,然后运行DoCmd.RunCommand acCmdCopy
。啊。我的意思是,我们可以沿着这条路走下去。但仍然。啊。
While MS 知识库文章向我们展示了如何做到这一点,但它涉及许多 Windows API 调用。哎呀。
这是唯一的两个选择吗?
VB 6 提供了Clipboard
对象使所有这一切变得极其简单和方便,但不幸的是,VBA 无法提供这一点。
如果是我,我会走 API 路线。没有理由害怕调用本机 API;该语言为您提供了这样做的能力是有原因的。
然而,一个更简单的替代方法是使用DataObject
类,它是 Forms 库的一部分。如果您已经在应用程序中使用表单库中的功能,我只建议您采用此路线。添加对此库的引用only使用剪贴板似乎有点傻。
例如,要将一些文本放置到剪贴板上,您可以使用以下代码:
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
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)