怎么用vbs实现随机读取文件的一行内容-创新互联

这篇文章主要介绍怎么用vbs实现随机读取文件的一行内容，文中介绍的非常详细，具有一定的参考价值，感兴趣的小伙伴们一定要看完！

代码如下:

randomize  
set fso=createobject("scripting.filesystemobject")  
set a=createobject("scripting.dictionary")  
set file=fso.opentextfile("a.txt")  
do while file.atendofstream<>true  
m=m+1  
a.add m,file.readline  
loop  
file.close  
h=int(rnd*m)  
msgbox "第" & h & "行:  " & a(h) ,4096,"随机内容"

以上是“怎么用vbs实现随机读取文件的一行内容”这篇文章的所有内容，感谢各位的阅读！希望分享的内容对大家有帮助，更多相关知识，欢迎关注创新互联行业资讯频道！