Dim dt As DataTable = '// fillTable()
Dim r As DataRow = dt.Rows(0)
Dim item As String = "test"
 
For Each dc As DataColumn In dt.Columns
  If (r(dc).ToString().ToUpper().Equals(item)) Then
    '// Ja! Item ist enthalten.	
  End If
Next