vbs如何把1.txt读出来用msgbox显示？
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
vbs如何把1.txt读出来用msgbox显示？
标题：vbs如何把1.txt读出来用msgbox显示？
Dim fs, f, text
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile("c:\1.txt")
text=f.ReadAll
MsgBox(text)
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile("c:\1.txt")
text=f.ReadAll
MsgBox(text)
不错，我一直在找vbs的 相关教程，但没有找到，
记得close
来源：https://www.cn-dos.net/forum/viewthread.php?tid=36544 · 打印时间 2026-06-13 20:34