| 标题 | 用vbs产生的若干个随机数并写入到一个.txt中的代码 |
| 范文 | 用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可以看到结果 |
| 随便看 |
|
在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板,是学习及工作的有利工具。