Automation中經常需要程序和剪切板交互，還在使用鍵盤一個一個input？內容多的話，豈不是太慢了，使用剪切板的黏貼復制，so fast,so easy……具體需要調用Microsoft Forms 2.0 Object Library的對象和方法，用它輕松實現(xiàn)設置和獲取剪切板的內容，下面寫了2個設置和獲取剪切板內容的函數，需要的時候直接調用~

成都創(chuàng)新互聯(lián)服務項目包括丹徒網站建設、丹徒網站制作、丹徒網頁制作以及丹徒網絡營銷策劃等。多年來，我們專注于互聯(lián)網行業(yè)，利用自身積累的技術優(yōu)勢、行業(yè)經驗、深度合作伙伴關系等，向廣大中小型企業(yè)、政府機構等提供互聯(lián)網行業(yè)的解決方案，丹徒網站推廣取得了明顯的社會效益與經濟效益。目前，我們服務的客戶以成都為中心已經輻射到丹徒省份的部分城市，未來相信會繼續(xù)擴大服務區(qū)域并繼續(xù)獲得客戶的支持與信任！

 'operating clipboard
Function setClipboard(str)
    'setting clipboard's content
    Dim Form, TextBox
    Set Form = CreateObject("Forms.Form.1")
    Set TextBox = Form.Controls.Add("Forms.TextBox.1").Object
    TextBox.MultiLine = True
    TextBox.Text = str
    TextBox.SelStart = 0
    TextBox.SelLength = TextBox.TextLength
    TextBox.Copy
End Function
Function getClipboard
    'getting clipboard's content
    Dim Form, TextBox
    Set Form = CreateObject("Forms.Form.1")
    Set TextBox = Form.Controls.Add("Forms.TextBox.1").Object
    TextBox.MultiLine = True
    If TextBox.CanPaste Then
        TextBox.Paste
        getClipboard = TextBox.Text
    End If
End Function

更多方法參考鏈接：http://demon.tw/programming/vbs-clipboard.html

網頁題目：VBScript設置和獲取剪切板內容的方法-創(chuàng)新互聯(lián)
文章分享：http://www.rwnh.cn/article18/dcepdp.html

成都網站建設公司_創(chuàng)新互聯(lián)，為您提供小程序開發(fā)、網站內鏈、網站導航、定制開發(fā)、定制網站、商城網站

廣告

聲明：本網站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)