Export xmL ไฟล์ โดยที่มี Format XML จะต้องเขียนยังไงครับ Win (Windows App), VB.NET

Dim a1, a2, a3, a4, c, d, t As String
        a1 = "1"
        a2 = "2"
        a3 = "3"
        a4 = "4"
        c = "images/GUp.jpg"
        d = "18/06/2555"
        t = "09:20"

<data>
 <table>
  <line><col0 image='"& c &"'></col0><col1>"& a1 &"</col1><col2 image='"& c &"'></col2><col3>"& a2 &"</col3></line>
  <line><col0 image='"& c &"'></col0><col1>"& a3 &"</col1><col2 image='"& c &"'></col2><col3>"& a4 &"</col3></line>
 </table>
 <remark xpos='225' ypos='215' ><![CDATA[<font color='#015231' weight='bold' size='40px'>"& d &"</font>]]></remark>
 <remark xpos='510' ypos='215' ><![CDATA[<font color='#015231' weight='bold' size='40px'>"& t  &"</font>]]></remark>
</data>

<data>
 <table>
  <line><col0 image='images/GUp.jpg'></col0><col1>1</col1><col2 image='images/GUp.jpg'></col2><col3>2</col3></line>
  <line><col0 image='images/GUp.jpg'></col0><col1>4</col1><col2 image='images/GUp.jpg'></col2><col3>3</col3></line>
 </table>
 <remark xpos='225' ypos='215' ><![CDATA[<font color='#015231' weight='bold' size='40px'>18/06/2555</font>]]></remark>
 <remark xpos='510' ypos='215' ><![CDATA[<font color='#015231' weight='bold' size='40px'>09:22</font>]]></remark>
</data>