SetClipboardData 怎么用？

我想把RichTextBox1按件中内容用SetClipboardData函数完全复制到剪贴板，而不是Clipboard.SetData简单地把文本或RTF格式的文本复制到剪贴板，就好比打写字板程序，选定里面的内容，单击右键菜单点“复制”的功能一样的效果。这时我粘贴到另一个写字板会一模一样，没有任何变化!
    请问，大侠该怎么实现？？最好有例子!

解决方案 »

  1.   

    Private Sub Command1_Click()
        RichTextBox1.LoadFile "c:\Doc1.rtf", rtfRTF
    End SubPrivate Sub Command2_Click()
        Clipboard.SetText RichTextBox1.SelRTF
    End SubPrivate Sub Command3_Click()
        RichTextBox2.SelRTF = Clipboard.GetText
    End Sub
      

  2.   

    剪贴板秘密多了!反正谁知道SetClipboardData 怎么用？
    要具体!
      

  3.   

    这与SetClipboardData函数无关
    MicroSoft为了提高兼容性，剪贴版中的数据会自动转换
      

  4.   

    楼上的这位说对了，我就是想利用剪贴版进行自动转换某种数据格式，所以请那位高手行行好告诉我怎么用SetClipboardData函数把RichTextBox1按件中内容完全复制到剪贴板，或有关SetClipboardData函数的资料也行!
      

  5.   

    也可以换一种说法：
        比如：在RichTextBox1中不单有设置好字体、颜色、大小的字符，还有图片，现在我想把它全部一点不差地复制到剪贴板。请问有没有办？？？？急!