VB如何向记事本写入数据？

VB如何向记事本写入数据？不用打开，在后台写就行！
不知道这样问行不行！

当然可以咯。
格式是这样的：

Open "(Path & FileName).txt" For Output/Append As #1
Print #1,exp1,exp2，……
Close #1

注意：引号里边是文件名，扩展名可以省略，但若是要能用记事本打开的话，就需要补充.txt作为其扩展名。Output是将原内容删除重写，Append是补写，不删除原内容，如果没有这个文件，将新建一个文件。
exp是要写入记事本的表达式

那个胡坤只是看到了表面，没有看到深入！！！ dim i as long linfor: for i = 0 to list.listcount - 1 if dir(list.list(i)) = "" then open app.path & "\load.txt" for append as #1 '你刚才用了两个open，把写入的文件又删了 print #1, list.list(i) close #1 list.removeitem i goto linfor '返回重复项，重新计算，因为删除一项以后下面的都变了，所以返回重来 end if next i

应该是inputbox吧，我想是吧 inputbox("请输入相关信息")这样就可以了

另一种： Dim FSO as FileSystemObject Dim OutStream as TextStream Set FSO=CreateObject("Scripting.FileSystemObject") Set OutStream=FSO.OpenTextFile(FileName,ForWriting,True,TristateFalse) OutStream.WriteLine 你要写入的内容 OutStream.WriteLine 你要写入的内容 OutStream.Close Set OutStream=Nothing Set FSO=Nothing