闲来无事,想学VBA,忙活了一天写了下面一段代码。仅供自己参考!
Public
Sub MyTest()
Sub MyTest()
Set fs = CreateObject("Scripting.FileSystemObject")
Set file = fs.CreateTextFile("c: estfile.txt
Set fs = CreateObject("Scripting.FileSystemObject")
Set file = fs.CreateTextFile("c: estfile.txt