下面我们来看怎么在VB中使用。打开工程，在VB工具菜单中选项中把修改错误捕获的设置。改成遇到未处理错误的中断。如下图所未。
运行程序，出现下面这个界面。下面可以看到有一个类可以测试，选择这个类，看Test Case列表，就能看到TestFields这个测试函数了。 按RunTest。如果通过测试，就能说明这两段代码就达成目的了。
下面我们来看出现错误的情况。把函数TestField中TestFieldtoFile oTestResult注释掉。这样就只导入文件，不进行导出文件。看一下Run Tests的结果，如下图所未：
可以看到，progress条变成红色，表示运行过程中有出错的测试。下错误列表中列出出现错误函数名及错误内容，可以双击出现某条单独的错误说明。下面状态条有测试的统计信息。
我们看上面的简单的39行代码，就能保证另一个类代码的正确性，并且，以后可以进行任意的修改，只要代码能够通过测试就能保证修改的没有产生意外的错误。
