VB Clipboard(剪贴板操作）的用法

Private Sub Command1_Click() s = "我是剪贴板中的内容" Clipboard.Clear '清空剪贴板 Clipboard.SetText s '将变量s文本赋给剪贴板 Text1 = Clipboard.GetText '将剪贴板中文本赋给text1 Clipboard.Clear Clipboard.SetData Picture1 '将picture1中图像赋给剪贴板 Picture2.Picture = Clipboard.GetData '将剪贴板中图像放到picture2中 SavePicture Clipboard.GetData, "d:\11.bmp " '将剪贴板中的图像保存到"d:\11.bmp"中 Text1.SelStart = 1 Text1.SelLength = 4 Print Text1.SelText Text1.SetFocus End Sub 'SelLength -返回或设置所选择的字符数? 'SelStart－返回或设置所选择的文本的起始点；如果没有文本被选中，则指出插入点的位置。 'SelText－返回或设置包含当前所选择文本的字符串；如果没有字符被选中，则为零长度字符串 ("")。 'Clipboard只有方法，没有属性和事件。方法还有GetFormat

转载于:https://www.cnblogs.com/hezq/p/9839919.html