VBS怎么实现将字符串写入剪切板

本篇内容主要讲解“VBS怎么实现将字符串写入剪切板”，感兴趣的朋友不妨来看看。本文介绍的方法操作简单快捷，实用性强。下面就让小编来带大家学习“VBS怎么实现将字符串写入剪切板”吧!

函数代码:

复制代码 代码如下:

Sub CopyString(s)
Set forms=WScript.CreateObject("forms.form.1")
Set textbox=forms.Controls.Add("forms.textbox.1").Object
With textbox
.multiline=True
.text=s
.selstart=0
.sellength=Len(.text)
.copy
End With
End Sub

'调用

复制代码 代码如下:

CopyString "亿速云 www.jb51.net"

完整测试代码

复制代码 代码如下:

Sub CopyString(s)
Set forms=WScript.CreateObject("forms.form.1")
Set textbox=forms.Controls.Add("forms.textbox.1").Object
With textbox
.multiline=True
.text=s
.selstart=0
.sellength=Len(.text)
.copy
End With
End Sub
CopyString "亿速云 www.jb51.net"
msgbox "ok"

到此，相信大家对“VBS怎么实现将字符串写入剪切板”有了更深的了解，不妨来实际操作一番吧！这里是亿速云网站，更多相关内容可以进入相关频道进行查询，关注我们，继续学习！