vbs刷屏代码。复制粘贴即可用


Dim name,msg
name="请输入要刷屏的文字:"
msg=Inputbox("请输入要刷屏文字(在刷屏期间不要将光标移出聊天框，不然会打开光标所在的程序)") Set WshShell= WScript.CreateObject("WScript.Shell")WshShell.AppActivate "无标题记事本"
num= 20
sleeptime=400
for i=1 to num
caution="，总共有" & num & "条刷屏，当前是第" & i &"条刷屏;总共需要" & sleeptime/1000*num & "秒" &"，还有"&  sleeptime/1000*num-sleeptime/1000*i  &"秒完成刷屏"
WshShell.Run "cmd.exe /c echo " & msg & caution & "| clip.exe", vbHide
WScript.Sleep sleeptime
WshShell.SendKeys "^v"
WshShell.SendKeys"{ENTER}"
next

使用步骤：创建txt文本文件。将上面代码粘贴进去。保存完毕后，将txt后缀名改为vbs即可.

注意事项：使用之前，光标必须在聊天窗口点一下，保证光标在聊天窗中，不然就更好玩了

vbs刷屏代码。复制粘贴即可用相关推荐

前端表白纪念日用js+html+css实现的页面代码复制粘贴就能用
前端表白纪念日用js+html+css实现的页面代码复制粘贴就能用页面如下: 代码: <!DOCTYPE html> <html><head><script ...
百度知道的代码复制粘贴到VB没有换行怎么办
在如下所示的网页中,复制粘贴到word文档,换行还是有的再复制到VB6.0中还是可用的转载于:https://www.cnblogs.com/acetaohai123/p/6605519.htm ...
GIS编程：利用Arcpy实现道格拉斯-普克算法（核心代码已用类包装，复制粘贴即可用）
道格拉斯-普克算法是一种通过递归实现折线&多边形抽稀简化的算法,原理很简单,大多数文章都有讲解,这里不多赘述,直接上代码. # -*- coding:utf-8 -*- import arcp ...
用Python-opencv快速实现人脸识别功能（从零开始教你）（复制粘贴即可用）
用Python快速实现人脸识别功能首先: 一.开发环境: 1.你需要个Python,下载好后设置环境变量(CSDN上面有很多这里不做过多介绍)可以参考 Python下载教程 2.下载pip-参考博主 ...
三十二个vbs整蛊代码，快去发给你的好朋友
恶作剧的vbs代码,这里提供的都是一些死循环或导致系统死机的vbs对机器没坏处,最多关机重启一下就可以了,将下面的任意一段代码保存为*.vbs即可操作方法:把代码保存为*.VBS运行即可经本人亲自 ...
vbs整人代码蓝屏_愚人节必备，教你制作整人神器，用代码实现计算机蓝屏
计算机蓝屏简称BSOD,又叫蓝屏死机.蓝屏死机提示已经成为Microsoft Windows操作系统标志性的画面.蓝屏死机主要是Microsoft Windows 系列操作系统为保护电脑数据文件不被破 ...
js 复制图片_不会做ppt？Reveal.js让你复制粘贴另类拉风，简洁优雅又低调
要了解一个新知识我们可以从三个方面入手:是什么,有什么用,怎么用.下面我们就从这三个方面进行讲解Reveal.js Reveal.js是什么它是一个专门用来做 HTML 演示文稿的框架,通俗的讲它是 ...
python考试代码复制_笨办法学Python 习题 26: 恭喜你，现在可以考试了！错误代码下载链接...
你已经差不多完成这本书的前半部分了,不过后半部分才是更有趣的.你将学到逻辑,并通过条件判断实现有用的功能. 在你继续学习之前,你有一道试题要做.这道试题很难,因为它需要你修正别人写的代码.当你成为程序 ...
python中如何实现复制粘贴_复制粘贴功能的Python程序 python 中如何实现
python 中如何实现对文件的复制.粘贴虽然小编心有不甘,可是小编也明白,这辈子就只能陪你到这了. 比如说:小编想将"c:\123\1.txt"复制到"d:\新建文件夹 ...
亲测全套支付可用(微信支付宝)复制粘贴即可跑
亲测全套支付可用(微信支付宝包括退款)复制粘贴即可跑 /*** @Auther: tjr* @Date: 2020/9/30 15:11* @Description: 支付宝后台接口*/ @Slf4j ...

vbs刷屏代码。复制粘贴即可用

vbs刷屏代码。复制粘贴即可用相关推荐

最新文章

热门文章