B4J Question parsing holidays, MiniHtmlParser

For Each td As HtmlNode In tds
            HtmlParser.PrintNode(td)
        Next

For i = 0 To trs.Size -1
        Dim tds As List = HtmlParser.FindDirectNodes(trs.Get(i), "td", Null)
        For Each td As HtmlNode In tds
            Dim TextNode As HtmlNode
            Dim a As HtmlNode = HtmlParser.FindNode(td, "a", Null)
            If a.IsInitialized Then
                TextNode = a
            Else
                Dim span As HtmlNode = HtmlParser.FindNode(td, "span", Null)
                If span.IsInitialized Then
                    TextNode = span
                Else
                    TextNode = td
                End If
            End If
            Log(HtmlParser.GetTextFromNode(TextNode, 0))
        Next
    Next