Acho que é isto que deseja: Private Function Funcao() As IEnumerable(Of String) Yield "Teste" Yield "Teste2" End Function [Coloquei no **GitHub** para referência futura][1]. [Documentação][2]. [1]: https://github.com/maniero/SOpt/blob/master/VB.NET/Function/Yield.vb [2]: https://docs.microsoft.com/en-us/dotnet/visual-basic/language-reference/statements/yield-statementWT.mc_id=DOP-MVP-5002397