Protected Sub btn_Erzeugen_Click(ByVal sender As Object, ByVal e As _
  System.EventArgs)
 
        'Teil 1: Wird nicht im Label ausgegeben
        Me.lbl_XML_Ausgabe.Text &= "<?xml version=" & """1.0""" & "encoding=" & _
          """utf-8""" & "?>"
 
        'Teil 2: Wird im Label ausgegeben
        Me.lbl_XML_Ausgabe.Text &= "<123456>"
 
End Sub