vb 自动创建txt

file_name="你要的名字（不要加.txt）"

open app.path & "\" & file_name & ".txt" for output as #1 '
.
. '这里如果你要处理就在这里写代码
.
close #1

是在电脑里创建还是在VB中

open app.path & "\your.txt" for output as #1 '创建your.txt文件
...
close #1