Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
'@TestMethod
Public Sub TestMethod1() 'TODO Rename test
On Error GoTo TestFail
'Arrange:
'Act:
'Assert:
Assert.Inconclusive
TestExit:
Exit Sub
TestFail:
Assert.Fail "Test raised an error: #" & Err.Number & " - " & Err.Description
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment