Redirect=" &amp; bRedirect &amp; vbCr &amp; _
                "OutFile=" &amp; sOutFile, _
                vbInformation + vbOKCancel, App.Title) Then Exit Sub
        End If
        ' Process object file replacement
        If ObjReplace Or OptReplace Or OptRemove Or OptAppend(True) Or
         OptAppend(False) Then
            sCmd = tok.Rebuild
            If bVerbose Then
                If vbCancel = MsgBox("Translated command line:" &amp; vbCr &amp; sCmd,
                 vbInformation + vbOKCancel, A