主题：在foxtable中形成了一个字符串，将它存为编码为"UTF-8",后缀为.kml的文件，并起动它，该怎么操作

String型变量不爱字符长度限制的。

WriteAllText可以写入，不过它只能保存Txt文件。

写入这种格式就麻烦了。

1、字符中的引号都要改成双引号

2、每行后面都要加换行符和连接符

如:

Dim a  As String
a = " <?xml version=""1.0"" encoding=""UTF-8""?>" & vbcrlf & _
 "<kml xmlns=""http://earth.google.com/kml/2.2"">" & vbcrlf & _
"<!-- Processed by GE-Path -->" & vbcrlf & _
"<Document>" & vbcrlf & _
"<name>New-Path</name>" & vbcrlf & _
"  <open>1</open>" & vbcrlf & _
"   <LookAt>" & vbcrlf & _
"<longitude>2.2</longitude>" & vbcrlf & _
"<latitude>1.11</latitude>" & vbcrlf & _
"<range>1000000</range>" & vbcrlf & _
"<tilt>0</tilt>" & vbcrlf & _
"<heading>0</heading>" & vbcrlf & _
"   </LookAt>" & vbcrlf & _
"   <Style id=""sgrillo1"">" & vbcrlf & _
"     <IconStyle>" & vbcrlf & _
" <Icon>" & vbcrlf & _
"<href>root://icons/palette-4.png</href>" & vbcrlf & _
"         <y>128</y>" & vbcrlf & _
"<w>32</w>" & vbcrlf & _
"<h>32</h>" & vbcrlf & _
"</Icon>" & vbcrlf & _
"     </IconStyle>" & vbcrlf & _
"</kml>  "
'……
ys.WriteAllText("C:\Documents and Settings\Administrator\桌面\wwffw.kml", a , True,Encoding.UTF8)

vbcrlf 是回车换行符.

在代码中拆分和合并语句

将单个语句拆分为多行

编写代码时，有时会创建一些很长的语句，使得您必须在代码编辑器中水平滚动。虽然这并不影响代码的运行，但会影响代码的阅读。
在这种情况下，应该考虑将单个长语句拆分为几行。
在要将该行断开的位置处使用行继续符，它是一个下划线 (_)，该下划线必须紧跟在空格后，并且在它后面紧跟行终止符（回车）。