怎么用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实现随机读取文件的一行内容"这篇文章的所有内容，感谢各位的阅读！希望分享的内容对大家有帮助，更多相关知识，欢迎关注行业资讯频道！