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