以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  金字塔中VBA 如何向剪切板写入，声明问题  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=73031)
--  作者：blueface
--  发布时间：2014/12/14 5:08:26
--  金字塔中VBA 如何向剪切板写入，声明问题
 想通过系统剪切板传值出去，

 

   Dim MyData As New DataObject    \'声明新DataObject 类
    MyData.SetText "文本内容"       \'设定文本，可以将Me.TextBox1.Text作为文本传递
    MyData.PutInClipboard           \'送入剪贴板


这几句在excel 的 VBA 中没错，从EXCEL vba 正可以读到剪切板的内容


但是在金字塔中报错。 谢谢！
--  作者：王锋
--  发布时间：2014/12/14 23:15:40
--  

金字塔里没有dataobject类的,你可以百度搜索一下VBS控制剪切板的范例