- 帖子
- 4
- 积分
- 16
- 技术
- 0
- 捐助
- 0
- 注册时间
- 2015-2-12
|
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 |
|