'以输出方式打开new.txt这里有路径问题参见 "c:\new.txt"就是指输出到哪个文件
'for output是指打开方式为输出方式 此方式如果该文件存在则覆盖
'as #1 打开文件需要占用工作区的,所以以1号工作区打开该文件
Open "C:\NEW.TXT" For Output As #1
'在一号文件区打开的文件里写入abc
Print #1, "abc"
'关闭一号工作区
Close #1
'任务完成加详解,有分没有?
End Sub
Private Sub button2_Click()
'以输出方式打开new.txt这里有路径问题参见 "c:\new.txt"就是指输出到哪个文件
'as #1 打开文件需要占用工作区的,所以以1号工作区打开该文件
'for append是指输出方式为追加方式
Open "C:\NEW.TXT" For Append As #1
'在一号文件区打开的文件里写入defg
Print #1, "defg"
'关闭一号工作区
Close #1
'任务完成加详解,有分没有?
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)