从VB生成Kml

时间:2012-02-14 17:58:32

标签: xml vb.net kml

我是KML开发的新手,我正在维护另一个人编写的代码 显影剂。

使用谷歌地球坐标正在加入 线型。

我希望以离散方式显示每个修复程序(旧版本) 时尚,仍然显示没有线条样式的最新坐标。

我如何实现这一目标?

我目前的kml文件与下面的代码类似,

我需要将这个kml代翻译成VB。

<?xml version="1.0" encoding="utf-8"?>
<kml xmlns="http://earth.google.com/kml/2.0">
 <Document>
   <LookAt>
     <longitude>144.969536466524</longitude>
     <latitude>-37.8081856342033</latitude>
     <range>1000</range>
     <tilt>0</tilt>
     <heading>0</heading>
   </LookAt>
   <Placemark>
     <name>Latest Fix</name>
     <Style>
       <IconStyle>
         <Icon>
           <href>root://icons/palette-4.png</href>
           <x>224</x>
           <y>224</y>
           <w>32</w>
           <h>32</h>
         </Icon>
       </IconStyle>
     </Style>
     <Point>
       <altitudeMode>clampToGround</altitudeMode>
       <coordinates>144.969536466524,-37.8081856342033,100.5</
coordinates>
     </Point>
   </Placemark>
   <Placemark>
     <name>NonApmTrack</name>
     <Style>
       <LineStyle>
         <color>FF55FF00</color>
         <width>6</width>
       </LineStyle>
     </Style>
     <MultiGeometry>
       <LineString>
       <tessellate>0</tessellate>
       <altitudeMode>clampToGround</altitudeMode>
       <coordinates>
144.968002662063,-37.8166516078636,92
144.966840595007,-37.8081166511402,94
       </coordinates>enter code here
           </LineString>
     </MultiGeometry>
   </Placemark>
 </Document>
</kml>

由于

0 个答案:

没有答案