Sicuramente ho capito male, credevo volesse escludere una parte di un file da split.
Invece probabilmente voleva splittare con "</contact>" al posto dei caratteri.
Prescindendo dalla scelta nel caso particolare, split ha bisogno di caratteri e non di parole.
Pertanto lo si sarebbe potuto usare così:
Public Sub Main()
Dim s As String
Dim ss As String[]
s = File.Load("/indirizzo/del/file.txt")
s = Replace(s, "</contact>", "</contact>|")
ss = Split(s, "|")
' visualizza le ultime frasi'
Print ss[ss.Max]
End