如何在VB.NET中用JustMock模拟接口属性

我正在使用JustMock来模拟接口进行单元测试，但也许我做得不对

我有一个界面：

Public Interface IFoo
    Property Bar as int
End Interface

我想模拟此接口并设置该属性，以便接口的使用者可以读取它。
首先：

Dim mockFoo as IFoo = Mock.Create(Of IFoo)()

我已尝试如下设置属性：

mockFoo.Bar = 1

Mock.Arrange(Sub() mockFoo.Bar = 1).DoNothing()

也像这样：

mockFoo.Bar = 1

Mock.Arrange(Sub() mockFoo.Bar = 1).DoNothing()

也像这样：

mockFoo.Bar = 1

Mock.Arrange(Sub() mockFoo.Bar = 1).DoNothing()

Arrange（函数（）mockFoo.Bar）.Returns（1）

我遵循Telerik论坛上这篇帖子的问答（不是我的问题）：

但是Telerik发布的例子并不能解决我的问题。它看起来也像一个具体化，而不是一个接口。我是不是走错了路

编辑、更新：
问题是我的项目没有建设。我可以使用以下语法获取接口属性：

Mock.Arrange(Function() mockFoo.Bar).Returns(1)

见Telerik的文件：

---

参见Telerik的文档：

刚刚意识到我在lambda中使用的C#语法，VB.NET可能会有所不同（我很少使用VB.NET）。是VB.NET语法

Sub（）

而不是

（）

？这对我不起作用。在VB.NET中，我可以使用

Function（）

而不是

（）

返回lambda，但是属性总是返回null/nothing。@Matthew您能发布失败的测试吗？语法看起来正确。问题是我的测试项目没有被重建。使用

函数（）。谢谢刚刚意识到这是我在lambda中使用的C#语法，而VB.NET可能会有所不同（我很少使用VB.NET）。是VB.NET语法
Sub（）
而不是
（）
？这对我不起作用。在VB.NET中，我可以使用
Function（）
而不是
（）
返回lambda，但是属性总是返回null/nothing。@Matthew您能发布失败的测试吗？语法看起来正确。问题是我的测试项目没有被重建。使用
函数（）。谢谢