在 VB.NET 中使用 Moq 的VerifySet

Question

我有一个功能可以更新 ASP.NET 会员资格提供程序中的用户。

<AcceptVerbs(HttpVerbs.Post)>
Public Function EnableUser(ByVal id As String) As JsonResult
  Dim usr As StargatePortalUser = _membershipService.GetUser(id, Nothing)
  usr.IsApproved = True
  _membershipService.UpdateUser(usr)
  Dim response As New AjaxResponse(usr.UserName)
  Return Json(response)
End Function

我正在尝试测试此函数以确保 IsApproved 属性设置正确

<TestMethod()>
Public Sub Service_Can_Enable_A_User_Account()
  ' Arrange
  Dim usr As New Mock(Of MembershipUser)
  usr.SetupProperty(Function(u) u.IsApproved)

  _membershipService.Setup(Function(m) m.GetUser(It.IsAny(Of String), It.IsAny(Of Boolean))).Returns(usr.Object)

  Dim target As New UsersController(_membershipService.Object)
  target.ControllerContext = New ControllerContext(FakeAuthenticatedHttpContext("testuser", String.Empty, True, True, False), New RouteData, target)

  ' Act
  Dim actual As JsonResult = target.EnableUser("userId")

  ' Assert
  Assert.IsTrue(DirectCast(actual.Data, AjaxResponse).Success)
  _membershipService.Verify(Sub(m) m.UpdateUser(It.IsAny(Of MembershipUser)), Times.Once)
  usr.Verify(Function(u) u.IsApproved = True)
End Sub

当我尝试验证 IsApproved 属性是否已设置为 True 时，返回异常：

System.ArgumentException：表达式不是方法调用：u => （u.IsApproved == True）

在 VB 中使用 Moq 的例子很少，我无法弄清楚，任何帮助将不胜感激。

这是 VB.NET 10 (.NET 4.0) 中的 ASP.NET MVC2 应用程序

编辑：

好吧，事实证明它在 VB 中并不是那么简单。

usr.Verify(Function(u) u.IsApproved = True)

需要

usr.VerifySet(Function(u) InlineAssignHelper(u.IsApproved, True))

，您需要添加以下功能：

Private Shared Function InlineAssignHelper(Of T)(ByRef target As T, ByVal value As T) As T
  target = value
  Return value
End Function

进一步编辑：

思考这个问题，我得出了一个更简单的解决方案。我改变了

Dim usr As New Mock(Of MembershipUser)
usr.SetupProperty(Function(u) u.IsApproved)
_membershipService.Setup(Function(m) m.GetUser(It.IsAny(Of String), It.IsAny(Of Boolean))).Returns(usr.Object)

然后

Dim usr As New Mock(Of MembershipUser)
usr.SetupProperty(Function(u) u.IsApproved)
Dim usrObj = usr.Object
_membershipService.Setup(Function(m) m.GetUser(It.IsAny(Of String), It.IsAny(Of Boolean))).Returns(usrObj)

可以

usr.VerifySet(Function(u) InlineAssignHelper(u.IsApproved, True))

用更简单的

Assert.IsTrue(usrOb.IsApproved)

替换有时我只是看不到简单的解决方案:)

Answer 1

您想要使用以下内容（来自 http://code.google.com/p/起订量/wiki/快速入门）：

//或者直接验证setter
mock.VerifySet(foo => foo.Name = "foo");

现在您输入的是比较而不是赋值，因此即使 Moq 确实毫无例外地处理了该语句，它仍然不是“Doing What You Mean”。

Answer 2

好吧，这可能有点晚了，但我面临着同样的问题，并且解决方案比使用 InlineAssignHelper 方法更简单。

只需将函数更改为子，它就应该可以工作。

所以试试这个：

usr.VerifySet(Sub(u) u.IsApproved = True)