I used code behind in the end.
Private Function searchForDuplicate(ByVal xpNav As XPathNavigator, ByVal xpIterator As XPathNodeIterator) As Boolean
Dim findItem As String
Dim nodeset As New List(Of String)
While xpIterator.MoveNext
Dim programme As String = ""
xpNav = xpIterator.Current
nodeset.Add(xpNav.Value.Trim)
End While
Dim ...