點(diǎn)擊菜單“項(xiàng)目”->“添加類”，打開(kāi)“添加新項(xiàng)”對(duì)話框，將名稱改為BookTest.vb或BookTest.cs、BookTest.jsl，然后點(diǎn)擊“添加”按鈕創(chuàng)建該類。修改代碼，VB代碼如下：
　　Imports NUnit.Framework

　　<TestFixture()> _
　　Public Class BookTest
　　　　Dim bo As Book = Nothing

　　　　<SetUp()> _
　　　　Public Sub Init()
　　　　　　Console.WriteLine("測(cè)試開(kāi)始！")
　　　　　　bo = New Book
　　　　　　Console.WriteLine("book對(duì)象被初始化！")
　　　　End Sub

　　　　<Test()> _
　　　　Public Sub testId()
　　　　　　bo.id = "001" '設(shè)置id屬性的值為
　　　　　　'使用Assert查看id屬性的值是否為
　　　　　　Assert.AreEqual("001"， bo.id)
　　　　　　Console.WriteLine("id屬性被測(cè)試！")
　　　　End Sub

　　　　<Test()> _
　　　　Public Sub testName()
　　　　　　bo.name = "ASP" '設(shè)置name屬性的值為ASP
　　　　　　'使用Assert查看name屬性的值是否為JSP，這是個(gè)必然出現(xiàn)錯(cuò)誤的測(cè)試
　　　　　　Assert.AreEqual("JSP"， bo.name)
　　　　　　Console.WriteLine("name屬性被測(cè)試！")
　　　　End Sub

　　　　<TearDown()> _
　　　　Public Sub Dispose()
　　　　　　Console.WriteLine("book對(duì)象將被清理！")
　　　　　　bo = Nothing
　　　　　　Console.WriteLine("測(cè)試結(jié)束！")
　　　　End Sub
　　End Class
這里Init和Dispose方法沒(méi)什么好說(shuō)的，是執(zhí)行了對(duì)book對(duì)象的初始化和清理，不過(guò)testId和testName需要說(shuō)明一下。前者是在對(duì)bo的id屬性進(jìn)行測(cè)試，首先賦值為”001”，然后使用Assert的AreEqual方法查看id屬性中存放的值是否是期待的值，由于我的期待值也是”001”，所以執(zhí)行后這個(gè)用例應(yīng)該是成功的；后者則是對(duì)bo的name屬性進(jìn)行測(cè)試，也是首先賦值為”ASP”，然后使用Assert的AreEqual方法查看其值是否是期待的，由于我特意將期待值設(shè)定為根本不可能的”JSP”，因此這個(gè)用例執(zhí)行后會(huì)出現(xiàn)一個(gè)錯(cuò)誤。但請(qǐng)注意，由于我是特意要讓測(cè)試出現(xiàn)錯(cuò)誤，所以將期待值設(shè)定成了不可能的值，如果你是測(cè)試人員，請(qǐng)千萬(wàn)不要這么做，否則如果別的地方導(dǎo)致了錯(cuò)誤，很容易給自己造成不必要的麻煩。
　　下面簡(jiǎn)單介紹一下上邊用到的靜態(tài)類NUnit.Framework.Assert。該類主要包含20個(gè)方法：
　　1．AreEqual()和AreNotEqual()方法，用來(lái)查看兩個(gè)對(duì)象的值是否相等或不等，與對(duì)象比較中使用的Equals()方法類似。
　　2．AreSame()和AreNotSame()方法，用來(lái)比較兩個(gè)對(duì)象的引用是否相等或不等，類似于通過(guò)“Is”或“==”比較兩個(gè)對(duì)象。
　　3．Contains()方法，用來(lái)查看對(duì)象是否在集合中，集合類型應(yīng)與System.Collections.IList兼容。示例：
　　　　Dim o As New Object
　　　　Dim al As New ArrayList
　　　　al.Add(o)
　　　　Assert.Contains(o， al)
　　4．Greater()和Less()方法，用來(lái)比較兩個(gè)數(shù)值的大小，前者相當(dāng)于大于號(hào)(>)，后者相當(dāng)于小于號(hào)(<)。
　　5．IsInstanceOfType()和IsNotInstanceOfType()方法，用來(lái)判斷對(duì)象是否兼容于指定類型。示例：
　　　　Dim t As Type = New Object().GetType
　　　　Dim s As String = ""
　　　　Assert.IsInstanceOfType(t， s)
由于Object是.net中所有類型的基類，String類型兼容于Object，因此這個(gè)示例是能夠運(yùn)行通過(guò)的。而下邊這個(gè)示例運(yùn)行將是失敗的：
　　　　Dim t As Type = New ArrayList().GetType
　　　　Dim s As String = ""
　　　　Assert.IsInstanceOfType(t， s)
　　6．IsAssignableFrom()和IsNotAssignableFrom()方法，用來(lái)判斷對(duì)象是否是指定類型的實(shí)例。示例：
　　　　Dim t As Type = New Object().GetType
　　　　Dim s As String = ""
　　　　Assert.IsAssignableFrom(t， s)
這個(gè)示例與之前的示例是一樣的，但由于字符串s不是Object類型的，因此無(wú)法運(yùn)行通過(guò)。而下邊這個(gè)實(shí)例可以運(yùn)行通過(guò)：
　　　　Dim t As Type = New String("").GetType
　　　　Dim s As String = ""
　　　　Assert.IsAssignableFrom(t， s)
　　7．IsFalse()和IsTrue()方法，用來(lái)查看變量是是否為false或true，如果IsFalse()查看的變量的值是false則測(cè)試成功，如果是true則失敗，IsTrue()與之相反。
　　8．IsNull()和IsNotNull()方法，用來(lái)查看對(duì)象是否為空和不為空。
　　9．IsEmpty()和IsNotEmpty()方法，用來(lái)判斷字符串或集合是否為空串或沒(méi)有元素，其中集合類型應(yīng)與ICollection兼容。
　　10．IsNaN()方法，用來(lái)判斷指定的值是否不是數(shù)字。
　　11．Fail()方法，意為失敗，用來(lái)拋出錯(cuò)誤。我個(gè)人認(rèn)為有兩個(gè)用途：首先是在測(cè)試驅(qū)動(dòng)開(kāi)發(fā)中，由于測(cè)試用例都是在被測(cè)試的類之前編寫(xiě)，而寫(xiě)成時(shí)又不清楚其正確與否，此時(shí)可以使用Fail方法拋出錯(cuò)誤進(jìn)行模擬；其次是拋出意外的錯(cuò)誤，比如要測(cè)試的內(nèi)容是從數(shù)據(jù)庫(kù)中讀取的數(shù)據(jù)是否正確，而導(dǎo)致錯(cuò)誤的原因卻是數(shù)據(jù)庫(kù)連接失敗。
　　12．Ignore()方法，意為忽略，用來(lái)忽略后續(xù)代碼的執(zhí)行，用途可以參考Fail()方法。
此外，NUnit還提供了一個(gè)專用于字符串的靜態(tài)類NUnit.Framework. StringAssert，該類主要包含4個(gè)方法：
　　1．Contains()方法，用來(lái)查看指定的第二個(gè)字符串中是否包含了第一個(gè)字符串。
　　2．StartsWith ()和EndsWith ()方法，分別用來(lái)查看指定的第一個(gè)字符串是否位于第二個(gè)字符串的開(kāi)頭和結(jié)尾。
　　3．AreEqualIgnoringCase()方法，用來(lái)比較兩個(gè)字符串是否相等。