手机
当前位置:查字典教程网 >脚本专栏 >vbs >用vbs产生的若干个随机数并写入到一个.txt中的代码
用vbs产生的若干个随机数并写入到一个.txt中的代码
摘要:复制代码代码如下:Seta=WScript.CreateObject("WScript.Shell")a.Run"notepad"'打开记事...

复制代码 代码如下:

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循环产生的参数的传递问题

用vbs模拟的一个asp的分页显示功能

vbs整人代码大集合 多年的代码收集

用vbs读取远程计算机上的文本文件的代码

用vbscript合并多个文本文件的代码

用vbs将名称截断以使其最多包含 16 个字符的代码

ntiIframe.vbs用于批量清除被添加到文件中的恶意代码

用vbscript实现从文本文件中删除所有重复行的代码

用vbs确定用户的登录名的代码

用vbs实现显示系统调色板的代码

精品推荐
分类导航