網(wǎng)站制作NEWS
SCROLL
求解vb代碼（自動復制，和自動粘貼）
Private Sub Command1_Click()
s = "我是剪貼板中的內(nèi)容"
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 -返回或設置所選擇的字符數(shù)?
'SelStart－返回或設置所選擇的文本的起始點；如果沒有文本被選中，則指出插入點的位置。
'SelText－返回或設置包含當前所選擇文本的字符串；如果沒有字符被選中，則為零長度字符串 ("")。'Clipboard只有方法，沒有屬性和事件。方法還有GetFormat
標簽： 求解vb代碼自動復制和自動粘貼
多重隨機標簽