VB6 有什麼好的 TDD 工具或資源嗎？

是的，我知道我已經落後於時代，但我在這裡得到的是一個古老的 VB6 編輯器應用程序，我相信沒有人會很快升級到 .NET。它使用了幾個第三方 DLL 工具，並且由於它仍在使用舊的 RichEdit 控制項，因此我基本上可以僅使用這個工具來建立我自己的 Bug 農場。

所以足夠了，我正在嘗試看看我是否可以使用 TDD，以便我可以開始為我需要修復的每個行為/功能編寫單元測試，所以遲早我可以為這個工具擁有一個完整的回歸測試套件。即使將來我們升級到.NET，我認為我編寫的大多數測試都應該有助於驗證正確的行為，並且應該也可以升級到.NET 版本，我猜。

一些基本的Google搜尋將我發送到這個工具呼叫simpleVBunit，但我找不到足夠的指南等來讓我開始，是的，我對 VB6 也不是那麼精通 :(

1. 那麼有人知道我有什麼好的工具/資源可以在這個 VB6 應用程序中使用 TDD 嗎？$$ Preferably upgradable to .NET later just in case. $$
2. 或者我實際上可以通過解決方法使用那些用於 .NET 的單元測試框架，即 NUnit 等？
3. 還是有更棒的方法來完成這項工作？

謝謝 ：）

編輯：

我試過弄亂vbunit，但我發現沒有簡單的方法可以將它添加到現有應用程序中，或者至少我不知道如何。因此，我發現它也可以使用vb-lite-unit和這個comunit。另外，有人說我們可以將NUnit 與 vb6 一起使用，但是這方面的資源更少。

VBUnit在 VB6 項目的前客戶中為我工作得很好。

我使用 SimplyVBUnit 獲得了非常流暢的 TDD 體驗。我認為程式碼附帶的範例非常不言自明。

您在啟動時最初載入的表單包含該控制項。然後在 Form_Load 子中你：

AddTest New TestDifferentAsserts

TestDifferentAsserts 是一個 vb 類。它看起來像這樣：

Public Sub TestFloatCompareTolerance()
  ' we will use the default tolerance of 0.00001
  Assert.AreEqual 9#, 9.000001, "Should be equal!"

  ' The Expected value must be a Double or Single
  ' for the tolerance to be used in the comparison.
  Assert.AreEqual 9, 9.000001, "This will fail because we didn't use a float for the expected value."
End Sub

事實上，明天我將在我的電腦上重新載入 vb6，以便使用 simplevbunit 在我的電腦上進行破解。

$$ ADDED EDIT $$ 這是我在 VB6 中的項目資源管理器：

Form1 是 simplevbunit 控制項所在的位置。

該項目的原始碼。

如果您有第三方控制，誰在乎。用門麵包裹它們。然後從外觀創建一個存根。

如果您需要進一步的幫助，請發表評論。

引用自：https://stackoverflow.com/questions/467789