方法1：
Open "c:\1.txt" For Output As #1 'c:\1.txt为保存文件
Print #1, Text1 & Text2 & Text3 &..... '将多个文本框内容用&合并在一起 写入内容
Close #1 '关闭文件
方法2：
Dim aa As String
aa =Text1 & Text2 & Text3 &..... '将多个文本框内容用&合并到变量aa
Open "c:\1.txt" For Output As #1 'c:\1.txt为保存文件
Print #1, aa '写入内容
Close #1 '关闭文件
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024