首页脚本用vbs产生的若干个随机数并写入到一个.txt中的代码

用vbs产生的若干个随机数并写入到一个.txt中的代码

时间2024-02-11 14:17:02发布访客分类脚本浏览304
导读:收集整理的这篇文章主要介绍了用vbs产生的若干个随机数并写入到一个.txt中的代码,觉得挺不错的,现在分享给大家,也给大家做个参考。 复制代码 代码如下:Set a=WScript.Cr...
收集整理的这篇文章主要介绍了用vbs产生的若干个随机数并写入到一个.txt中的代码,觉得挺不错的,现在分享给大家,也给大家做个参考。 复制代码 代码如下:
Set a=WScript.CreateObject("WScript.Shell")
a.Run "notepad"
'打开记事本
do
Randomize
x= Int((40 * Rnd) + 1)
'产生一个1~40的随机数赋给X
WScript.Sleep 1000
a.SendKeys x& ","
'模拟键盘,输出x
n=n+1 '累计器
if n=10 then wscript.quIT '若累计器N为10则推出脚本
loop
'保存成vbS可以看到结果
您可能感兴趣的文章:
  • VBS合并一个文件夹里的TXT的实现代码
  • vbs解决处理TXT文本数据相关问题实现代码
  • VBS实现将Excel表格保存为txt文本
  • TXT转HTM、HTML「TXT转网页」的vbs实现代码
  • 将HTML或txt文件转换为ASP输出的vbs代码
  • 用VBS将一篇txt后缀的内容保存为html格式
  • vbs实现的支持拖动的txt文本切割器
  • vbs操作txt文本文件常用方法与函数代码

声明:本文内容由网友自发贡献,本站不承担相应法律责任。对本内容有异议或投诉,请联系2913721942#qq.com核实处理,我们将尽快回复您,谢谢合作!


若转载请注明出处: 用vbs产生的若干个随机数并写入到一个.txt中的代码
本文地址: https://pptw.com/jishu/609908.html
运行同一目录下的可执行程序的VBS代码 Hardware

游客 回复需填写必要信息