怎么用Vbs读取文本文件中任意一行啊?贴代码,多谢啦

如题所述

file = "D:\123.txt" Set fso = CreateObject("Scripting.Filesystemobject") word = fso.OpenTextFile(file,1).ReadAll words = Split(word,vbCrLf) maxLine = UBound(words) Randomize rndLine = Int(maxLine * Rnd) MsgBox words(rndLine) 测试可用...

求采纳
温馨提示:答案为网友推荐,仅供参考
相似回答