例如,把文件"E:\新建文件夾\a.txt"復(fù)制到剪貼板
創(chuàng)新互聯(lián)成立與2013年,是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司,擁有項(xiàng)目成都網(wǎng)站設(shè)計(jì)、成都網(wǎng)站制作、外貿(mào)網(wǎng)站建設(shè)網(wǎng)站策劃,項(xiàng)目實(shí)施與項(xiàng)目整合能力。我們以讓每一個(gè)夢(mèng)想脫穎而出為使命,1280元西固做網(wǎng)站,已為上家服務(wù),為西固各地企業(yè)和個(gè)人服務(wù),聯(lián)系電話:028-86922220
CreateObject("Shell.Application").NameSpace("E:\新建文件夾").ParseName("a.txt").InvokeVerb?"復(fù)制(C)"
Dim p1 As New Point(0, 0)
Dim p2 As New Point(My.Computer.Screen.WorkingArea.Width, My.Computer.Screen.WorkingArea.Height) '除工具欄全屏
Dim pic As New Bitmap(p2.X, p2.Y)
Using g As Graphics = Graphics.FromImage(pic)
g.CopyFromScreen(p1, p1, p2)
PictureBox1.Image = pic
End Using
Clipboard.SetImage(PictureBox1.Image)
截圖到PictureBox1中顯示,然后在把PictureBox1.image放到剪切板中
第一步,點(diǎn)擊VS工具
請(qǐng)點(diǎn)擊輸入圖片描述
第二步,打開(kāi)后,新建一個(gè)Windows窗體應(yīng)用程序
請(qǐng)點(diǎn)擊輸入圖片描述
第三步,新建完畢后,如圖所示
請(qǐng)點(diǎn)擊輸入圖片描述
第四步,拖動(dòng)文本框與按鈕,如圖示
請(qǐng)點(diǎn)擊輸入圖片描述
第五步,將剪貼板復(fù)制與粘貼代碼輸入,如圖示
請(qǐng)點(diǎn)擊輸入圖片描述
第六步,運(yùn)行程序
請(qǐng)點(diǎn)擊輸入圖片描述
7
第七步,點(diǎn)擊按鈕,成功從剪貼板中復(fù)制與粘貼操作
請(qǐng)點(diǎn)擊輸入圖片描述
用Computer類里的Clipboard的幾個(gè)Get函數(shù)
如獲取剪貼板里的文本
Dim c As New Microsoft.VisualBasic.Devices.Computer
MsgBox(c.Clipboard.GetText())
可以直接用My 里的
MsgBox(My.Computer.Clipboard.GetText())
獲取圖片
Me.BackgroundImage = My.Computer.Clipboard.GetImage()
在獲取前確定剪貼板里有沒(méi)有文本
If My.Computer.Clipboard.ContainsText Then
MsgBox(My.Computer.Clipboard.GetText)
End If
設(shè)置剪貼板里的文本
My.Computer.Clipboard.SetText(Now)
復(fù)制文件夾不用剪貼板,使用系統(tǒng)文件操作對(duì)象就好了
CreateObject("scripting.filesystemobject").copyfolder "c:\Program Files", "D:\Program Files"
當(dāng)前名稱:vb.net剪貼板 vb不能打開(kāi)剪貼板
文章分享:http://jinyejixie.com/article46/dodphhg.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供外貿(mào)網(wǎng)站建設(shè)、網(wǎng)站內(nèi)鏈、外貿(mào)建站、網(wǎng)站維護(hù)、網(wǎng)站制作、手機(jī)網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)
猜你還喜歡下面的內(nèi)容