Vb.Net行动代表问题？

Question

是vb.net新手.这个问题可能是非常新手并且之前得到了回答,但我找不到.我正在尝试lambda功能,并在这里受到打击.

 Private Function HigerOrderTest(highFunction as Func(Of Int16,Int16)) As Action(of String)
  Dim sam = highFunction(3)    
  Dim DoIt as Action(of String)
  DoIt = sub(s) console.WriteLine(s)            
    return DoIt  
 End Function

我得到了"表达预期".在线DoIt = sub(s)console.WriteLine(s).当我将其更改为DoIt = function(s)console.WriteLine(s)时,我得到的Expression不会产生值.错误.有什么问题？

Answer 1

如果您使用的是Visual Studio 2008(VB.NET 9),则VB.NET中存在一个限制,要求lambda表达式返回一个值,因此您无法使用Sub.这已在VB.NET 10中发生了变化,因此在该环境中,您的代码应该按预期工作.

问题是,一方面你需要将lambda表达式变为a 而Function不是a Sub,而另一方面Console.WriteLine则没有返回值.解决方案是将其包装到一个函数中,该函数调用Console.WriteLine 并返回一个值:

Private Function ConsoleWriteLine(ByVal text As String) As String
    Console.WriteLine(text)
    Return text
End Function

然后你可以在lambda表达式中使用该函数:

Dim DoIt As Action(Of String)
DoIt = Function(s) ConsoleWriteLine(s)