Я не эксперт по VB, но для меня это самый чистый способ:
func(New String() { str })
Однако, если это недостаточно для вас, вы можете использовать методы расширения или , специфичные для строки:
func(str.ToStringArray)
или в общем виде:
func(str.ToSingleElementArray)
Вот последний способ расширения:
<Extension> _
Public Shared Function ToSingleElementArray(Of T)(ByVal item As T) As T()
Return New T() { item }
End Function