vb.net - 如何模拟一个类并测试它的功能

Question

我有一个有两个函数的类，但我喜欢模拟一个函数并测试另一个函数的功能？

public class Alpha
   Function F1() As String
        SendMail()
        return "Sample"
     End function


       '''code to send mail 
        End sub
End class

在这里我想测试 F1() 的功能并想模拟 SendMail()。可能吗？

现在我这样做：

       Dim objAlpha As New Mock<Alpha>
       objAlpha.Setup(Function(x) x.SendMail())
       Dim lstrReturnValue As String =objAlpha.Object.F1()

这是正确的方法吗？但我面临问题。请提供一种为此场景编写模拟测试的方法。