[系统相关] VBS脚本的FSO

rockeywy

Dim fso,filepath,f,i,str


Set fso = CreateObject("Scripting.FileSystemObject")

filepath="d:\新建文本文档.txt"

Set f= fso.CreateTextFile(filepath)

For i=1 To 100
    str=  str & i & vbcrlf
  

红色部分：str= str & i & vbcrlf
=后面STR是什么意思呀，后面的那个STR理解不了，请老师指点一下

Next
f.Write str
f.close

MsgBox  "已运行"

Set fso =Nothing
Set f = Nothing

rockeywy

我是不是可以理解为，=后面的str是一个总的从1写到了100后打了一个包，再返给STR呢

shelluserwlb

就是每次都将前一次str中的值+i+回车后的结果再次赋给str。  (str = str & i & vbcrlf)
这样循环100次之后，str中的值就是  “1 回车 2 回车 ..... 100”

rockeywy

明白了，谢谢你呀