prova con

Dim lst As String = Split(str, "#SPLIT#", CompareMethod.Text)

cfr https://docs.microsoft.com/it-it/dot...tframework-4.8