Wrap Sub作为函数在Lambda中使用

Question

我有一个VB9和Moq的问题。

我需要调用Sub上的验证。像这样：

logger.Verify(Function(x) x.Log, Times.AtLeastOnce) 

我的记录是这样的：

Public Interface ILogger 
    Sub Log() 
End Interface 

但随着VB这是不可能的，因为日志的方法是一个Sub，从而不产生价值。

我不想将该方法更改为函数。

什么是解决这个限制的最简洁的方法，是否有任何方式来包装Sub作为一个函数像下面？范围

拉姆达参数不

Answer 1

VB10允许黏巴达替补的使用：

logger.Verify(Function(x) ToFunc(AddressOf x.Log), Times.AtLeastOnce) 

我已经试过这一点，但我得到。

您是否尝试过一个简单的包装，如：

Public Function Wrapper(source as Action) as Boolean 
    source.Invoke() 
    Return True 
End Function 

Answer 2

2010年，如果其子，而不是一个功能只是附属功能替换。

logger.Verify（子（X）x.Log，Times.AtLeastOnce）