用vb的代码编写剪切板,是用来剪切图片的

用vb的代码编写一个能剪切图片的剪切板!!
例如:用自己编的剪切板代替下面的剪切板
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_PASTE = &H302

Private Sub Command1_Click()
Clipboard.SetData LoadPicture("c:\1.bmp")  'Clipboard就是剪切板 ,用自己编的剪切板代替它
SendMessage RichTextBox1.hwnd, WM_PASTE, ByVal 0&, ByVal 0& '
End Sub

---

学习，研究一下。顶

---

如需要阅读该回复，请登录或注册CSDN!