You can handle this by adding a vbld_StepDone script event like this to the Team Foundation steps:
Code:
Sub vbld_StepDone()
If vbld_TempMacros()("RUNPROGRAM_EXITCODE") = 1 Then Step.BuildStatus = vbldStepStatSucceeded
End Sub
http://www.kinook.com/VisBuildPro/Ma...riptevents.htm
We'll also add to our request list explicit support for this in the Team Foundation action.