Et objekt problem?

XML delen fungere fint, men det er functionen som ikke fungere som et objekt. Bør jeg lave det som en class og oprette et nyt objekt hver gang jeg rekursivt kalder funktionen eller burde det ikke kunne lade sig gøre bare at returnere et objekt af typen label fra en almindelig funktion?

Dim XD As New System.Xml.XmlDocument
XD.Load(Server.MapPath("fil.xml"))
Dim XS As System.Xml.XmlNode = XD.DocumentElement

PlaceHolder1.Controls.Add(fn(XMLS)

Function fn(ByVal XS As System.Xml.XmlNode) As Label
  For Each XN As System.Xml.XmlNode In XS.ChildNodes
    if XN.Attributes("title").InnerText <> "" Then
      lblText.Controls.Add(fn(XN))
    End if
  Next
End Function