VBS实现将字符串写入剪切板的实现代码
导读：收集整理的这篇文章主要介绍了VBS实现将字符串写入剪切板的实现代码，觉得挺不错的，现在分享给大家，也给大家做个参考。 函数代码: 复制代码 代码如下: Sub CopyString(s ...
收集整理的这篇文章主要介绍了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.js-code.COM"
完整测试代码
复制代码 代码如下:
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.js-code.com"
msgbox "ok"
您可能感兴趣的文章:
- VBS访问剪贴板的几种方法小结
声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！
若转载请注明出处： VBS实现将字符串写入剪切板的实现代码
本文地址： https://pptw.com/jishu/609949.html