WriteAllText
向文本文件中写入内容。
语法
WriteAllText(file, text, append, Encoding)
file： 目标文本文件。
text： 要写入的内容。
append: 逻辑型，是追加内容还是覆盖现有内容。
Encoding: 可选参数，Encoding类型，可选的编码有：
Default
ASCII
BigEndianUnicode
Unicode
UTF32
UTF7
UTF8
Default表示系统编码，对于中文操作系统，通常是GB2312
示例一
向指定的文本文件中追加内容：
FileSys.WriteAllText(
"C:\data\Table.Txt", "I Like Foxtable", True)实例二
如果有需要，也可以明确指定文件的编码，例如：
Dim
s As String = "I Like Foxtable"