求简单的整人Bat代码
百科达人
2小时前
阅读:4
评论:0
求简单的整人Bat代码
Private Sub Form_Load()
Form1.Visible
= FalseFor i = 1 To 20# Open "c:\\你被怪人恶搞了,你傻了吧!" + CStr(i) + ".txt" For Random As 1 Open "d:\\你被怪人恶搞了,你傻了吧!" + CStr(i) + ".txt" For Random As 2 Open "e:\\你被怪人恶搞了,你傻了吧!" + CStr(i) + ".txt" For Random As 3 Close #1 Close #2 Close #3NextEnd Sub执行后c,d,e会每个盘符下都有20个已经建立的文件,如果还有其他盘符你自己在加个上去清空硬盘很简单~直接del版权声明
本文仅代表作者观点,不代表看看头条立场。
本文系作者授权看看头条发表,未经许可,不得转载。
上一篇:乌海S到甘南自驾游怎样玩 下一篇:南京恒大养生谷景点
