請先引用Microsoft Forms2.0 Object Library
Dim tmpData As New DataObject
tmpData.SetText "要傳送到剪貼板的值"
tmpData.PutInClipboard
如果引用項裡找不到Microsoft Forms2.0 Object Library
請進入代碼窗口,依次單擊"工具"--"引用"--"浏覽"
在系統的system32目錄裡找到FM20.DLL,確定後就可以在引用窗口看到Microsoft Forms2.0 Object Library了.