2013-02-22 26 views
0

我有嘲笑的對象,我想與分配我與調用它的參數變量:Vb.Net起訂量:攔截參數設置爲可變

Dim myMockedObject = new Mock(Of MyObject)() 

Dim catchedVariable As MyEventArgs 
myMockedObject.Setup(Sub(x) x.MyMethod(Of MyEventArgs)(It.IsAny(Of MyEventArgs))) 

我需要找到一種方法,填寫catchedVariable

無法找出使用out參數的方法(方法是ByVal,不想僅爲了測試而更改它)。

嘗試像CallBack Moq方法,但沒有成功。

回答

1

得到它與回調的工作:

_args As MyEventArgs 
myMockedObject.Setup(Sub(x) x.MyMethod(Of MyEventArgs)(It.IsAny(Of MyEventArgs)())).Callback(Sub(x As MyEventArgs) _args = x)