我可以在 VB.NET 中实现 IEnumerable 函数的收益返回吗？

Question

可能的重复：
VB.NET 中的产量

在 C# 中，当编写返回 IEnumerbleIEnumerble< 的函数时， >，您可以使用 yield return 返回枚举的单个项目，并使用 yield break; 表示没有剩余项目。执行相同操作的 VB.NET 语法是什么？

NerdDinner 代码中的示例：

public IEnumerable<RuleViolation> GetRuleViolations() {

   if (String.IsNullOrEmpty(Title))
       yield return new RuleViolation("Title required","Title");

   if (String.IsNullOrEmpty(Description))
       yield return new RuleViolation("Description required","Description");

   if (String.IsNullOrEmpty(HostedBy))
       yield return new RuleViolation("HostedBy required", "HostedBy");

   if (String.IsNullOrEmpty(Address))
       yield return new RuleViolation("Address required", "Address");

   if (String.IsNullOrEmpty(Country))
       yield return new RuleViolation("Country required", "Country");

   if (String.IsNullOrEmpty(ContactPhone))
       yield return new RuleViolation("Phone# required", "ContactPhone");

   if (!PhoneValidator.IsValidNumber(ContactPhone, Country))
       yield return new RuleViolation("Phone# does not match country", "ContactPhone");

   yield break;
}

此 将 C# 转换为 VB.NET 工具 给出“YieldStatement 不受支持”错误。

Answer 1

目前，从语言语法层面来看，VB.Net 中还没有与 C# 的yield return 等效的方法。

然而，Bill McCarthy 最近在 MSDN 杂志上发表了一篇关于如何在 VB.Net 9.0 中实现类似模式的文章

• http://visualstudiomagazine.com/articles/2009/02/01/use-iterators-in-vb-now.aspx

Answer 2

新的异步 CTP 包括对 Yield 的支持在 VB.NET 中。

有关使用信息，请参阅 Visual Basic 中的迭代器。

Answer 3

请在此处查看我的答案：

• VB.NET 中的产量
• VB.NET 中的迭代器模式（C# 将使用 Yield！）

总结一下：
VB.Net 没有yield，但 C# 通过将代码转换为幕后的状态机来实现yield。 VB.Net 的 Static 关键字还允许您在函数中存储状态，因此理论上您应该能够实现一个类，该类允许您在用作 Static 时编写类似的代码code> 方法的成员。

Answer 4

VB.NET 中没有收益回报:(
只需创建一个列表并将其返回即可。

Answer 5

在幕后，编译器创建一个枚举器类来完成这项工作。由于 VB.NET 没有实现此模式，因此您必须创建自己的 IEnumerator(Of T) 实现

Answer 6

下面给出输出： 2, 4, 8, 16, 32

在 VB 中，

Public Shared Function setofNumbers() As Integer()

    Dim counter As Integer = 0
    Dim results As New List(Of Integer)
    Dim result As Integer = 1
    While counter < 5
        result = result * 2
        results.Add(result)
        counter += 1
    End While
    Return results.ToArray()
End Function

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    For Each i As Integer In setofNumbers()
        MessageBox.Show(i)
    Next
End Sub

在 C# 中

   private void Form1_Load(object sender, EventArgs e)
    {
        foreach (int i in setofNumbers())
        {
            MessageBox.Show(i.ToString());
        }
    }

    public static IEnumerable<int> setofNumbers()
    {
        int counter=0;
        //List<int> results = new List<int>();
        int result=1;
        while (counter < 5)
        {
          result = result * 2;
          counter += 1;
          yield return result;
        }
    }