Board logo

标题: [系统相关] VBS脚本的FSO [打印本页]

作者: rockeywy    时间: 2015-2-13 17:24     标题: VBS脚本的FSO

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    时间: 2015-2-13 17:32

我是不是可以理解为,=后面的str是一个总的从1写到了100后打了一个包,再返给STR呢
作者: shelluserwlb    时间: 2015-2-13 17:58

本帖最后由 shelluserwlb 于 2015-2-13 18:03 编辑

就是每次都将前一次str中的值+i+回车后的结果再次赋给str。  (str = str & i & vbcrlf)
这样循环100次之后,str中的值就是  “1 回车 2 回车 ..... 100”
作者: rockeywy    时间: 2015-2-15 16:41

明白了,谢谢你呀




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2