我一直在尝试在我的项目上运行单元测试(vs2010 pro,asp.net 项目,后面有 vb.net 代码,.net 4.0),但没有成功。以下是我的最新尝试,当我运行它时,我得到“不确定:测试未运行”。我究竟做错了什么?
Imports Microsoft.VisualStudio.TestTools.UnitTesting.Web
Imports Microsoft.VisualStudio.TestTools.UnitTesting
Public Class CriteriaCopy
Private Shared Function ConvertToDBNull(ByVal intGID As Integer) As Object
Dim result
If intGID.Equals(0) Then
result = DBNull.Value
Else
result = intGID
End If
Return result
End Function
<TestClass()>
Class Test
<TestMethod()>
Public Sub ConvertToDBNullTest()
Dim intGID As Integer = 1
Dim expected As Object = 1
Dim actual As Object
actual = ConvertToDBNull(intGID)
Assert.AreEqual(expected, actual)
End Sub
End Class
End Class