应该如何起订量的VerifySet在VB.net

Question

我想测试一个属性已设置但被调用，当我写这篇文章的一个单元测试：

moqFeed.VerifySet(Function(m) m.RowAdded = "Row Added") 

MOQ抱怨说，“表达不是属性二传手调用”

我完整的代码是

Imports Gallio.Framework 
Imports MbUnit.Framework 
Imports Moq 

<TestFixture()> Public Class GUI_FeedPresenter_Test 
    Private moqFeed As Moq.Mock(Of IFeedView) 
    <SetUp()> Sub Setup() 
     moqFeed = New Mock(Of IFeedView) 
    End Sub 
    <Test()> Public Sub New_Presenter() 
     Dim pres = New FeedPresenter(moqFeed.Object) 
     moqFeed.VerifySet(Function(m) m.RowAdded = "Row Added") 
    End Sub 
End Class 

Public Interface IFeedView 
    Property RowAdded() As String 
End Interface 

Public Class FeedPresenter 
    Private _FeedView As IFeedView 

    Public Sub New(ByVal feedView As IFeedView) 
     _FeedView = feedView 
     _FeedView.RowAdded = "Row Added" 
    End Sub 
End Class 

我找不到在VB中最小起订量的任何例子，我将是任何例子感激。

Answer 1

请参阅我的问题Using Moq's VerifySet in VB.NET以解决此问题。