Acho que é isto que deseja:

    Private Function Funcao() As IEnumerable(Of String)
        Yield "Teste"
        Yield "Teste2"
    End Function

[Documentação][1].


  [1]: https://docs.microsoft.com/en-us/dotnet/visual-basic/language-reference/statements/yield-statement