Public Class Class1
Public OutPut As String = ""
Public StoreThis As String = ""
Public Function GiveOutPut(ByVal s As String) As String
OutPut = s + " OutPut"
If s = "S" Then
CallThis()
End If
Return OutPut
End Function
Public Sub CallThis()
///pretend something useful is going on here
End Sub
End Class
この例は非常に弱いですが、入力パラメータs = "S"があるたびにCallThis()が呼び出されることを証明するテストメソッドをどのように記述できますか?サブルーチンが呼び出されたことを確認する単体テストを書くにはどうすればよいですか?