In this case the ColumnValues property of the NotesViewEntry class, will return an Array and the common way of obtaining it's value will fail.
To access the entry's column value weather it's an array or not, use this:
And then use it like this:Function getColValue (vCol As Variant) As String
If Isarray(vCol) Then
getColValue = Cstr(vCol(0))
Else
getColValue = Cstr(vCol)
End If
End Function
stringValue = getColValue(vwEntry.ColumnValues(1))