并行.foreach vb.net答案

【问题标题】：parallel.foreach vb.net并行.foreach vb.net
【发布时间】：2013-03-24 22:16:39
【问题描述】：

谁能给我正确的语法如何在 vb.net 中编写以下代码

public static void CopyFiles(string fromFolder, string toFolder)
{
    Parallel.ForEach<string>(Directory.EnumerateFiles(fromFolder, "*"), f =>
    {
        File.Copy(f, toFolder + @"\" + Path.GetFileName(f), true);
    });
}

我尝试使用 developerfusion.com/tools/convert/csharp-to-vb 进行转换，转换后的代码是：-

Public Shared Sub CopyFiles(fromFolder As String, toFolder As String)

    Parallel.ForEach(Of String)(Directory.EnumerateFiles(fromFolder, "*"), Function(f) 
    File.Copy(f, toFolder & "\" & Path.GetFileName(f), True)
    End Function)

End Sub

及其引发的编译时异常。请告诉我，这段代码出了什么问题。

【问题讨论】：

你从哪里得到的 sn-p？
那里有很多代码转换网站。 SO 不是其中之一。
Dan-o 我试过很多网站。但是它们没有正确转换。
Ash Burlaczenco 我从某人的博客中得到的
什么是编译时异常？

标签： vb.net c#-to-vb.net parallel.foreach

【解决方案1】：

当您没有返回值时，您正在创建一个函数，请尝试创建一个子例程。看看这是否有效。

Public Shared Sub CopyFiles(fromFolder As String, toFolder As String)
    Parallel.ForEach(Of String)(Directory.EnumerateFiles(fromFolder, "*"),
        Sub(f)
            File.Copy(f, toFolder & "\" & Path.GetFileName(f), True)
        End Sub)
End Sub

【讨论】：

很好的简化示例。干杯！