Question

VB中如何将text中的文字复制到粘贴板中，有什么函数啊？

例如我按一个command1就能把text1中的内容复制到粘贴板中，在其他程序（例如QQ对话框）就能直接按ctrl+v粘贴，程序怎么写啊！

Answer 1

Private Declare Function icePub_toClipboard Lib "icePubDll.dll" (ByVal strBuffer As String) As Integer

Dim a2 As Integer

a2 = icePub_toClipboard(Text1.Text)